[VB 6] Image auf einer Form per Tasten bewegen?

G3kai

Grünschnabel
Hi

Ist es möglich, ein Image auf einer Form "frei" zu bewegen?

Ich möchte also ein Image machen, welches ich per W,A,S,D (vorne,links,rechts,unten) frei auf der Form bewegen kann.


Hier nochmal, falls nicht verstanden wird, was ich meine:
http://img233.imageshack.us/my.php?image=2222222222toh5.jpg
(Der schwarze Punkt soll also im grünen Feld durch W,A,S,D bewegbar seien können)

Ist sowas also möglich oder muss ich jede Bewegung einzeln definieren?

lG
 
Hallo, hier ein Beispiel:
Code:
Private Sub Form_Load()
  Me.KeyPreview = True
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
  Select Case KeyCode
    Case vbKeyW
      Me.Image1.Top = Me.Image1.Top - 50
      
    Case vbKeyA
      Me.Image1.Left = Me.Image1.Left - 50
      
    Case vbKeyS
          Me.Image1.Left = Me.Image1.Left + 50

    Case vbKeyD
          Me.Image1.Top = Me.Image1.Top + 50
  End Select
End Sub
 
Zurück