GetAsyncKeyState: Unterschied zwischen den Versionen
Aus API-Wiki
(Hinweis bzgl. LSB des Rückgabewerts ergänzt) |
|||
| Zeile 3: | Zeile 3: | ||
Diese Funktion fragt den Status einer Taste ab. | Diese Funktion fragt den Status einer Taste ab. | ||
| − | <vb>Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer</vb> | + | <<syntaxhighlight lang="vb">>Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer</<syntaxhighlight lang="vb">> |
==Parameter== | ==Parameter== | ||
| Zeile 16: | Zeile 16: | ||
==Beispiel== | ==Beispiel== | ||
| − | <vb> | + | <<syntaxhighlight lang="vb">> |
Dim vKey As Long | Dim vKey As Long | ||
| Zeile 24: | Zeile 24: | ||
End If | End If | ||
Next vKey | Next vKey | ||
| − | </vb> | + | </<syntaxhighlight lang="vb">> |
==Quellen== | ==Quellen== | ||
Version vom 5. November 2016, 23:10 Uhr
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">>
