Zum Bewegen verändert man einfach die Left und Top-Werte des Elemenetes.
Hier ist ein Beispiel
Erstelle ein Label und nenne es lblFigur
Ändere Hintergrundfarbe auf schwarz.
dann gib folgenden text ein:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyLeft Then
'beim Dürcken der linken taste
lblFigur.Left = lblFigur.Left - 120
' bewegt sich das element nach links
ElseIf KeyCode = vbKeyRight Then
'bei Drücken der der rechten taste
lblFigur.Left = lblFigur.Left + 120
' bewegt sich das element nach rechts
ElseIf KeyCode = vbKeyUp Then
'beim Drücken der oberen taste
lblFigur.Top = lblFigur.Top - 120
' bewegt sich das element nach oben
ElseIf KeyCode = vbKeyDown Then
'beim Drücken der unteren taste
lblFigur.Top = lblFigur.Top + 120
' bewegt sich das element nach unten
End If
End Sub
Somit bewegt man steuerelemente.
Diese können natürlich auch größere bewegungen machen
oder durch einen timer ausgeführt werden