home *** CD-ROM | disk | FTP | other *** search
/ Planet Source Code Jumbo …e CD Visual Basic 1 to 7 / 1_2002.ISO / Data / Zips / Christmas_4204412142001.psc / Module1.bas < prev    next >
Encoding:
BASIC Source File  |  2000-01-22  |  391 b   |  6 lines

  1. Attribute VB_Name = "Module1"
  2. Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
  3. Declare Function SetKeyboardState Lib "user32" (lppbKeyState As Byte) As Long
  4. Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
  5.  
  6.