1.建立一个新的标准EXE工程,我们就可以开始这次的学习了。

2.我们要建立一个模块,然后添加以下代码:
 


        ( lpClassName  ,  lpWindowName  )  

        ( hWnd1  ,  hWnd2  ,  lpsz1  ,  lpsz2  )  

      ( hwnd  , lpdwProcessId  )  

      ( dwDesiredAccess  ,  bInheritHandle  ,  dwProcessId  )  

      ( hObject  )  

      ( hProcess  ,  lpBaseAddress  ,  lpBuffer  ,  nSize  ,  lpNumberOfBytesWritten  )  

  PROCESS_ALL_ACCESS = &H1F0FFF
3.接下来Form中,我们要在程序启动时连接游戏窗口,以下是Form_Load的代码:
 hwd   ‘ 储存  函数返回的句柄
 pid  
 hProcess   
  Form_Load()
hwd = (, )
 hwd = 0 
   , vbOKOnly, 
   Form1
 
 hwd, pid   


hProcess = (PROCESS_ALL_ACCESS, 0, pid)
 hProcess = 0 
   , vbOKOnly, 
   Form1
 
 hProcess
4.我们在Form中添加一个Label控件和一个Timer控件,设置Timer的Interval属性为100,Timer1_Timer的代码如下:
 h  
hProcess = (PROCESS_ALL_ACCESS, , pid)
 hProcess 
   hProcess,  &H8C6A54, h, 4, 0& ‘这三条代码读取获得生命值 
   hProcess,  h + &H24, h, 4, 0& 
   hProcess,  h + &H254, h, 4, 0&
   hProcess
 
Label1.Caption = h