دستور کلیدهای جهت دار کیبورد برای VB چیست؟

[elham99]

بالا ،پایین ، چپ . راست
من تعدادی button دارم و میخوام به جای کیبورد از کمه های رو صفحه برای برنامه استفاده کنم.

من میخوام کلیدهای جهت دار کیبورد رو تو برنامه ای خودم داشته باشم. یعنی دقیقا همونا باشن

[m.4.r.m]

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyRight Then: MsgBox "Right"
If KeyCode = vbKeyLeft Then: MsgBox "left"
If KeyCode = vbKeyUp Then: MsgBox "Up"
If KeyCode = vbKeyDown Then: MsgBox "Down"
End Sub

[meys34]

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

keybd_event VK_LEFT, 0, 0, 0 'KeyDown
keybd_event VK_LEFT, 0, 2, 0 'Key Up