KeyDown

Jeg har lavet et spil, hvor man går "et felt" ved at trykke på spacebar.

Man skal kun gå et felt ad gangen, dvs. spacebar man må ikke kunne holde spacebar nede og så gå igennem felterne.

Jeg har lagt koden ind i KeyDown-eventen, således at :

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = vbKeySpace Then
        ContKey = True
    End If
End Sub

ContKey er en boolean som jeg bruger flere steder i spillet.

Jeg har overvejet at bruge KeyUp istedet, men det giver et tung fornemelse når man spilller.

Nogle som har løsningsforslag?