VB获取游戏窗口句柄

'下面取游戏窗口句柄 hwnd

Mir2Hwnd = FindWindow("TFrmMain", "legend of mir2")

hwnd = FindWindowEx(Mir2Hwnd, 0, "TDXDraw", vbNullString)

'以下为虚拟按键

PostMessage hwnd, WM_SETFOCUS, 0, 0 '获得窗口焦点

PostMessage hwnd, WM_KEYDOWN, 0, 0 '发送回车键

'PostMessage hwnd, WM_KEYDOWN, VK_UP, MapVirtualKey(VK_UP, WM_KEYDOWN) '发送向上键

'PostMessage hwnd, WM_KEYDOWN, VK_RETURN, MapVirtualKey(VK_RETURN, WM_KEYDOWN) '发送回车键

'向游戏窗口发送喊话内容

PostMessage hwnd, WM_CHAR, data(i), 0&

PostMessage hwnd, WM_CHAR, data(i + 1), 0&

___________

以上代码也可以用VBS实现, 且更简单. 如有不明,请qq 312897211

这个不用易的模块，要用api，你可以查一下api里有一个寻找子窗口的函数，那个就是找窗口句柄的。下面我给你粘出引用的语句及dll

语句：

父窗口句柄＝寻找子窗口_(0,0,取空白文本(0),“欲取句柄窗口”)

dll：

.版本2

.dll命令寻找子窗口_,整数型,"user32.dll","findwindowexa",,,在窗口列表中寻找与指定条件相符的第一个子窗口

找到的窗口的句柄。如未找到相符窗口，则返回零。会设置getlasterror

.参数窗口句柄1,整数型,,在其中查找子的父窗口。如设为零，表示使用桌面窗口（通常说的顶级窗口都被认为是桌面的子窗口，所以也会对它们进行查找）

.参数窗口句柄2,整数型,,从这个窗口后开始查找。这样便可利用对findwindowex的多次调用找到符合条件的所有子窗口。如设为零，表示从第一个子窗口开始搜索

.参数欲搜索的类名1,文本型,,类名

.参数欲搜索的类名2,文本型,,标题