Hejsan...!

Hur skriver man om man vill att något ska utföras i keydown om två tangeter är nere samtidigt?

Case vbKeyUp And vbKeyRight <---- detta funkar ju inte någe vidare för mig...

Tack för alla svar // R-mus

gör ungefär så här:

dim sLeft as boolean
dim sRight as boolean osv

sen i en timer med intervall tex 50....=)

if sLeft = true then
gubbe.left = gubbe.left - 50
end if


i keydown:

sLeft = true

i keyup:
sLeft = false

hoppas du förstår.


/bj

Hej

Så här har jag, jag kollar om man tryckt Enter eller Ctrl + d

Private Sub txtTid_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer)
If Shift And vbCtrlMask And KeyCode = vbKeyD Then
Här klickade vi Ctrl + d
ElseIf KeyCode = 13 Then
Här klickade vi bara Enter
End If
End Sub

Anna-Karin

Hej
En liten kommentar till Ctrl + d

Den kan du fånga med If KeyAscii = 4 Then

mvh
Sven

Hej igen!

jag tror inte jag nådde fram med vad jag ville ha sakt.

Det är bara när man har UPP och HÖGER tangent nere samtidigt som det ska hände en sak, men med ex, bj:s förslag blir det ju inte så. och det måste väl finnas nåt sätt att kolla om två tangenter är nere med select case-sats.

Man kan ju ta en massa if-satser.. men om man vill ha select case då?

Nåt att fundera på // R-mus