Tutorials Infos - Anleitungen - Hilfe - Dreamcodes
 

Taste bewegen

Private Sub Form_Load()
Me.KeyPreview = True
Me.ScaleMode = vbCentimeter
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyLeft Then
Object.Left = Object.Left + 1
End If
End Sub

 
ID: 1901
eingestellt am: 17.01.2010
Autor: Keine Angabe
Status zum lesen: Gast
gelesen: 5116
Webseite: www.dreamcodes.com
[Drucken]