Visual Basic - Estado de la tecla "Bloq Mayús"

Tengo una pantalla de Login para un sistema en Visual Basic 6.0, sensible a Mayúsculas y Minúsculas, y quiero dar una advertencia al usuario para que sepa si la tecla "Bloq Mayús" se encuentra activada, algo similar a la de Windows XP...

Sugerencias??

Gracias de antemano!!

Mete esto en un modulo

Public Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
Global Const VK_CAPITAL = &H14
Global keys(0 To 255) As Byte

Y esto en el evento change del TextBox que recoge el login

GetKeyboardState keys(0)
If Not keys(VK_CAPITAL) = False Then
MsgBox "Mayusculas activadas"

End If

Supongo que habran otras formas de hacerlo, pero esta funciona, fijo.

Gracias, excelente ayuda!!

Saludos!!