[ممدوح]

كود :

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
   Me.KeyPreview = True
End Sub

Private Sub Form1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
   Select Case e.KeyCode

       Case Keys.Left
           ' حرك الصورة يسار

       Case Keys.Right
           ' حرك الصورة يمين

       Case Keys.Up
           ' حرك الصورة أعلى

       Case Keys.Down
           ' حرك الصورة أسفل
   End Select
End Sub