Private Declare Sub keybd_event Lib “user32” (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey
Private Declare Sub keybd_event Lib “user32” (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey
Private Declare Sub keybd_event Lib “user32” (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey
Private Declare Sub keybd_event Lib “user32” (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey
Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As _ Long’ Get the current state of the NumLock keyFunction GetNumLockKey() As Boolean GetNumLockKey = GetKeyState(vbKeyNumlock)End Function
Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As _ Long’ Get the current state of the CapsLock keyFunction GetCapsLockKey() As Boolean GetCapsLockKey = GetKeyState(vbKeyCapital)End Function
Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As _ Long’ Get the current state of the ScrollLock keyFunction GetScrollLockKey() As Boolean GetScrollLockKey = GetKeyState(vbKeyScrollLock)End Function
Private Declare Function GetKeyState Lib “user32” (ByVal nVirtKey As Long) As _ Long’ Get the current state of the Insert keyFunction GetInsertKey() As Boolean GetInsertKey = GetKeyState(vbKeyInsert)End Function
We almost always need to develop forms in which the contents to the control have to be selected whenever the user tabs to a textbox or a combobox. For this