Hi, ich möchte gern ein Label mit den Pfeiltasten bewegen.
Hab zwar viele Beiträge dazu gefunden, aber nichts so wirklich verstanden.
Ich hab's jetzt schonmal mit wasd hinbekommen, aber auch eher per copy&past aus 'nem forum gezogen.
könnt ihr mir da weiterhelfen?
Hab zwar viele Beiträge dazu gefunden, aber nichts so wirklich verstanden.
Ich hab's jetzt schonmal mit wasd hinbekommen, aber auch eher per copy&past aus 'nem forum gezogen.
VB.NET-Quellcode
- Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
- Select Case e.KeyChar
- Case "w"
- lbl_snake.Top = lbl_snake.Top - 10
- Case "a"
- lbl_snake.Left = lbl_snake.Left - 10
- Case "s"
- lbl_snake.Top = lbl_snake.Top + 10
- Case "d"
- lbl_snake.Left = lbl_snake.Left + 10
- End Select
- End Sub
könnt ihr mir da weiterhelfen?