Private Sub Form1_KeyPress(ByVal KeyAscii As Integer, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
With bollen
If KeyAscii = 119 Then
Top = Top - 30
ElseIf KeyAscii = 97 Then
Left = Left - 30
ElseIf KeyAscii = 115 Then
Top = Top + 30
ElseIf KeyAscii = 100 Then
Left = Left + 30
End If
End With
End Sub
Tacksam för snabb hjälp!
"I want our kids in Mercedes' and BMWs, not those little commie mobiles." ~Peter Schiff om Trabant