How do I determine the Num Lock status, on or off, and
display it on a status bar?

TIA

Hi,

Use the getkeystate api to determine the numlock state. Setup a
timer to update the numlock panel on the statusbar.

Declare Function GetKeyState Lib "user32" Alias "GetKeyState" (ByVal
nVirtKey As Integer) As Boolean

Const VK_NUMLOCK = &H90

Ken

-----------

"CK" <(E-Mail Removed)> wrote in message
news:01e201c36ffd$0dd90000$(E-Mail Removed)...
> How do I determine the Num Lock status, on or off, and
> display it on a status bar?
>
> TIA

Hello,

"CK" <(E-Mail Removed)> schrieb:
> How do I determine the Num Lock status, on or off, and
> display it on a status bar?

Untested:

\\\
Private Declare Auto Function GetKeyState Lib "user32.dll" ( _
ByVal nVirtKey As VirtualKey _
) As Boolean

Public Enum VirtualKey As Integer
NumLock = 144
CapLock = 20
End Enum
..
..
..
If GetKeyState(VirtualKey.NumLock) Then
...
End If
///

HTH,
Herfried K. Wagner
--
MVP · VB Classic, VB .NET
http://www.mvps.org/dotnet