به دست آوردن کاراکتر های یک متن

[zanjiran]

سلام.
من چند سوال در مورد کاراکتر های یک متن دارم اگه لطف کنید راهنمایی کنید ممنون می شم.
من یک متن دارم که متشکل از کاراکتر های انگلیسیه مثلا این متن : Hello
من می خوام کاراکتر های این متن هر کدوم توی یه خونه از آرایه برن.
ضمنا یه سوال دیگه هم داشتم که آیا کاراکتر های فارسی ، کد اسکی دارن یا نه.
متشکرم.

[hossein71]

For i = 0 To Len(Text1.Text)
a(i) = Mid$(Text1.Text, i + 1, 1)
Next i

بله،کاراکترهای فارسی هم کد اسکی دارن.در لینک یه برنامه برات گذاشتم که روی هر دکمه کیبورد میزنی کد اسکی شو بهت میده(فارسی رو هم بهت میده).امیدوارم بدردت بخوره.

http://www.barnamenevis.org/forum/showthread.php?t=226980