Hejsan, jag undrar hur man flyttar en bild med piltangenerna?? I KeyDown skriver du vart i formen som bilden ska visas Testa detta.Flytta en bild med piltangenterna
lr hur man gör så att tex gubben ändras mellan varje tryck typ 4 frames lr nått... tack //3rrorSv: Flytta en bild med piltangenterna
/SuneSv: Flytta en bild med piltangenterna
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case 37 ' Vänsterpil
Picture1.Move Picture1.Left - 10
Case 38 ' Pil Upp
Picture1.Move Picture1.Left, Picture1.Top - 10
Case 39 ' Högerpil
Picture1.Move Picture1.Left + 10
Case 40 ' Pil Ner
Picture1.Move Picture1.Left, Picture1.Top + 10
End Select
End Sub
'OBS!! Glöm inte att sätta Form.KeyPreview till TRUE
/Wolf