Visual Basic - mayusculas

necesito detectar si el boton de mayuscula esta activado,no tengo mucha idea acabo de empezar en esto,algruein me pondria mandar un ejemplo?¿
GRACIAS

pone el siguiente codigo en la seccion de declaraciones:

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

Luego, en el momento que quieras velidar si la tecla mayuscula esta presionada utiliza:

GetKeyboardState keys(0)
If keys(VK_CAPITAL) Then
........
endif