Alt-Taste loslassen

07/01/2014 - 12:05 von spanker.leach | Report spam
Hallo zusammen,

schon etwas spàt, trotzdem ein frohes Neues allerseits.

Beim MouseMove in einem form passiert in meinem Programm etwas, wenn dabei die Alt-Taste gehalten wird:

AltDown = False
Retval = GetAsyncKeyState(&H12)
If Retval And &H8000 Then
AltDown = True
End If

So weit so gut, funktioniert.
Nur beim Loslassen der Alt-Taste bekommt das Menü den Focus - eigentlich normal.
Das möchte ich aber gern verhindern.

Gibt es da wohl eine Möglichkeit?
Also Alt-Taste loslassen = kein Effekt?


Viele Grüsse,
Karl
 

Lesen sie die antworten

#1 spanker.leach
07/01/2014 - 12:23 | Warnen spam
Hallo Ingrid,

zu simpel:


Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

If KeyCode = 18 Then KeyCode = 0

End Sub



Viele Grüsse,
Karl

Ähnliche fragen