Rubrik: Maus & Tastatur · Tastatursteuerung | VB-Versionen: VB4, VB5, VB6 | 27.01.01 |
![]() Prüfen, ob CAPS-Lock (Feststelltaste) bzw. NUM-Lock eingeschaltet ist oder nicht. | ||
Autor: ![]() | Bewertung: ![]() ![]() ![]() ![]() ![]() | Views: 28.703 |
https://www.tools4vb.com | System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11 | ![]() |
Mit Hilfe des nachfolgenden Codes können Sie prüfen, ob CAPS-Lock bzw. NUM-Lock eingeschaltet ist oder nicht.
' zunächst die benötigte API-Funktion Public Declare Function GetKeyState Lib "user32" ( _ ByVal nVirtKey As Long) As Integer ' Status: CAPS-Lock If GetKeyState(vbKeyCapital) = 1 Then _ MsgBox "CAPS-Lock ist eingeschaltet!" ' Status: NUM-Lock If GetKeyState(vbKeyNumlock) = 1 Then _ MsgBox "NUM-Lock ist eingeschaltet!"
Anmerkung:
Unter Windows 2000 gibt die Funktion GetKeyState für die NUM-Lock Taste den Wert 0 zurück, falls NUM-Lock eingeschaltet ist.