Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal _
   lpClassName As String, ByVal lpWindowName As String) As Long
    Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, _
    ByVal lpdwProcessId As Long) As Long
    Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, _
    ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
    Declare Function ReadProcessMem Lib "kernel32" Alias "ReadProcessMemory" ( _
    ByVal hProcess As Long, ByVal lpBaseAddress As Any, ByRef lpBuffer As Any, _
    ByVal nSize As Long, ByVal lpNumberOfBytesWritten As Long) As Long
    Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, _
    ByVal lpBaseAddress As Any, ByVal lpBuffer As Any, ByVal nSize As Long, _
    ByVal lpNumberOfBytesWritten As Long) As Long
    Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
    Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As _
      Integer
    Declare Function Hotkey Lib "user32" Alias "GetAsyncKeyState" (ByVal key As _
    Long) As Integer