14-08-17, 01:58 AM
(14-08-17, 12:59 AM)سعود كتب :ممكن ايميل الفيس بوك بتاع حضرتكإقتباس :شكرا هذا هو الى كنت بدو عليهالعفو
ينقصه شي وقد سالت عنه ولسى مالقيت حل وبحثت وهو اقتناص ازرار التنقل اللي هي الاسهم بلوحة المفاتيح اريدها تعمل ولا احتاج للنقر بالماوس
اكواد الاسهم
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.Left Then
هنا اكتب كود التحريك لليسار
End If
End Sub
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.rightThen
هنا اكتب كود التحريك اليمين
End If
End Sub
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.upThen
هنا اكتب كود التحريك فوق
End If
End Sub
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
If e.KeyCode = Keys.downThen
هنا اكتب كود التحريك تحت
End If
End Sub
