طریقه ی استفاده از keyascii

[ali-software]

من چطور می تونم از keyascii استفاده کنم؟


این کد درسته؟

if ketascii=13 then unload me

[mpmsoft]

شما باید در رویداد زیر از اون استفاده کنید


Private Sub Text_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then Unload Me
End Sub

[ebrahimashori]

شما علاوه بر استفاده از کد مثلا 13 که معرف enter هست می توانید از توابع خود ویژال نیز استفاده کنید. مثلا:
vbkey0 ,vbkey1....vbkey9
vbkeyf1,vbkeyf2.......vbkeyf12
و هر چیز دیگه ای که فکر می کنم اولش عبارت vbkey باشه نیز استفاده کنید.

[sohrab o]

شما علاوه بر استفاده از کد مثلا 13 که معرف enter هست می توانید از توابع خود ویژال نیز استفاده کنید. مثلا:
vbkey0 ,vbkey1....vbkey9
vbkeyf1,vbkeyf2.......vbkeyf12
و هر چیز دیگه ای که فکر می کنم اولش عبارت vbkey باشه نیز استفاده کنید.

نه هر چیز، بعضی مثلا یک ثابت خاص هستند

[hossein033]

دوست عزیز شما باید حتما این کد ها رو درون رویداد KeyDown بنویسید و گرنه برنامه هیچ کاری انجام نمی ده

مثل این کد :

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then End
End Sub

[M_P_1374]

KeyAscii یک متغییر از نوع Integer (عدد صحیح) میباشد که شامل 255 کد است و هر عدد از 1 تا 255 متعلق به یک کلید بر روی کیبورد است

[mmssoft]

کی کدها عبارتند از :
دکمه
A ---------------> 65
B ---------------->66
C ---------------> 67
D ---------------->68
E ---------------> 69
F---------------->70
G ---------------> 71
H ---------------->72
I ---------------> 73
J ---------------->74
K ---------------> 75
L ---------------->76
M ---------------> 77
N ---------------->78
O ---------------> 79
P ---------------->80
Q ---------------> 81
R ---------------->82
S ---------------> 83
T ---------------->84
U ---------------> 85
V---------------->86
W ---------------> 87
X ---------------->88
Y ---------------> 89
Z---------------->90
برای اعداد هم از ۰ تا ۹ به ترتیب از ۴۸ است تا ۵۷
برای F ها باید از این ساختار بروی : vbKeyF1
برنامه نویسی : این خط کد میگه اگر دکمه A را زد Print کند :




(Private Sub Form_KeyDown(KeyCode as Integer,Shift as Integer
if KeyCOde=65 then
"Me.Print "You Press A Key
End if
End Sub

[ali-software]

دوستان هر کسی هر چی می دونه در این تاپیک بگذارد تا این تایپیک یک مرجع کد اسکی باشد.ممنونم

[ali-software]

اولین پستم با من
سورسی برای پیدا کردن کد اسکی در یک listbox

dim i as integer
for i= 0 to 255
( list1.additem i &":"& chr(i
next i

[mmssoft]

این هم یه سورس کد در مورد HotKey ها.
همراه با یک فایل آموزشی PDF.

[loads]

من فکر میکنم بستگی داره تو چه برنامه ای بخواهیم استفاده کنیم . مثلاً این روش (KeyDown) اصلاً به درد ساخت بازی نمیخوره ، باید از GetAsyncKeyState استفاده کنیم .