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
转载于:https://blog.51cto.com/zdj63/34408