im using this code here:

Private Sub form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 37 Then
picArrow.Move picArrow.Left - 50
End If
If KeyCode = 39 Then
picArrow.Move picArrow.Left + 50
End If
If KeyCode = 40 Then
picArrow.Move picArrow.Left, picArrow.Top + 50
End If
If KeyCode = 38 Then
picArrow.Move picArrow.Left, picArrow.Top - 50
End If
End Sub

and my picturbox (picArrow) doesnt move at all, ive tryed many different kinds of codes, all i want it to do is move the picArrow, help!