GetAsyncKeyState

Aus API-Wiki
Wechseln zu: Navigation, Suche


Diese Funktion fragt den Status einer Taste ab.

<<syntaxhighlight lang="vb">>Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer</<syntaxhighlight lang="vb">>

Parameter

vKey

Virtueller Tastencode der abzufragenden Taste.


Rückgabewert

Null, wenn die Taste nicht gedrückt ist.
Ungleich Null, wenn die Taste gedrückt ist, wobei das minderwertigste Bit (LSB) gesetzt ist, wenn die Taste erst nach dem letzten Aufruf von GetAsyncKeyState gedrückt wurde. Auf dieses Verhalten sollte allerdings nicht vertraut werden, da eine andere Anwendung zwischenzeitlich GetAsyncKeyState aufgerufen haben könnte. Für nähere Informationen hierzu beachten Sie bitte den verlinkten MSDN-Artikel.

Beispiel

<<syntaxhighlight lang="vb">> Dim vKey As Long

For vKey = 32 To 128 ' Tasten "zwischen" Leertaste und Euro-Zeichen

  If GetAsyncKeyState(vKey) <> 0 Then
     Me.Caption = Chr$(vKey) & " ist gedrückt."
  End If

Next vKey </<syntaxhighlight lang="vb">>

Quellen

MSDN Library - GetAsyncKeyState