Vb实现鼠标点击的小游戏。

使用API:

1.使用FindWindow或EnumWindows获取父窗口的句柄。如果有子窗口,还可以使用FindWindow或EnumChildWindows获取子窗口的句柄,并向窗体添加一个计时器。

控件(如果没有窗口,也可以使用SetTimer和KillTimer),并使用SendMessage

或者PostMessage可以向窗口发送消息。发送的消息是:

WM_LBUTTONDOWN和WM_LBUTTONUP。

2.可以使用mouse_event。详情查看API!

3.可以用WinIO,自己从网上下载!

下面是VB中的API声明:

public Declare Sub mouse _ event Lib“user 32”别名“mouse _ event”(ByVal dw flags为Long,ByVal dx为Long,ByVal dy为Long,ByVal cButtons为Long,ByVal dwExtraInfo为Long)

公共声明函数FindWindow Lib“user 32”别名“FindWindowA”(ByVal lpClassName为字符串,ByVal lpWindowName为字符串)为Long

公共声明函数FindWindowEx Lib“user 32”别名“FindWindowExA”(ByVal hwnd 1为Long,ByVal hWnd2为Long,ByVal lpsz1为String,ByVal lpsz2为String)为Long

公共声明函数EnumChildWindows Lib“user 32”别名“EnumChildWindows”(ByVal hwnd parent为Long,ByVal lpEnumFunc为Long,ByVal lParam为Long)为Long

公共声明函数EnumWindows Lib“user 32”(ByVal lpEnumFunc为Long,ByVal lParam为Long)为Long

公共声明函数SendMessage Lib“user 32”别名“SendMessage a”(ByVal hwnd为Long,ByVal wMsg为Long,ByVal wParam为Long,lParam为Any)为Long

公共声明函数PostMessage Lib“user 32”别名“PostMessageA”(ByVal hwnd为Long,ByVal wMsg为Long,ByVal wParam为Long,ByVal lParam为Long)为Long

公共Const WM _ LBUTTONDOWN = & ampH201

公共Const WM _ LBUTTONUP = & ampH202