29-08-14, 01:21 AM
29-08-14, 05:48 AM
و عليكم السلام ......
في خاصية form اختر الحدث keydown او keyup و من ثم
If e.KeyCode = Keys.F7 Then
MsgBox("")
End If
و لا تنسى تجعل الخاصية keypreview للفورم True
و تسطيع انت تختار ما تشاء و ان شاء الله يكون هذا جواب سؤالك ......
في خاصية form اختر الحدث keydown او keyup و من ثم
If e.KeyCode = Keys.F7 Then
MsgBox("")
End If
و لا تنسى تجعل الخاصية keypreview للفورم True
و تسطيع انت تختار ما تشاء و ان شاء الله يكون هذا جواب سؤالك ......
29-08-14, 08:52 AM
و بالنسبة ل alt +m
PHP كود :
If e.Modifiers = Keys.Alt And e.KeyCode = Keys.M Then
MsgBox("فيجوال بيسك العرب")
End If
31-08-14, 01:16 AM
مع أحترامى مع اخىraoe-04
هذه الطريقه افضل
ثم ضع هذا الكود فى Timer
هذه الطريقه افضل
كود :
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
ثم ضع هذا الكود فى Timer
كود :
If GetAsyncKeyState(Keys.A) Then
Your Code '
End If