VB6 获取 NumLock 键的状态，子程序 GetNumLockKey2025年8月31日 14:19
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As _
Long
' Get the current state of the NumLock key
Function GetNumLockKey() As Boolean
GetNumLockKey = GetKeyState(vbKeyNumlock)
End Function
全部回复（0）