Question

如何使用VB 让鼠标左键重复点击

输入重复时间间隔后 按一个键开始鼠标左键点击 另一个键停止 怎么实现？

Answer 1

用API接口即可完成任务。

自动按下和放开按钮，这是通过模拟鼠标左键的按下和放开来实现的。该功能需调用API函数SendMessage向按钮发一对鼠标左键按下和放开的消息，函数接口声明如下：

Declare Function SendMessage Lib “user32 Alias “SendMessageA (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

SendMessage函数的hwnd参数为接收消息的窗口或控件的hwnd句柄。wMsg参数指定具体的消息值。在本例中，要发送鼠标左键按下和释放的消息，wMsg的取值分别为WM_LBUTTONDOWN和WM_LBUTTONUP，这两个常量定义如下：

Const WM_LBUTTONDOWN = ＆H201
Const WM_LBUTTONUP = ＆H202

把这两个消息发送给一个按钮，按钮就会像真的被鼠标左键单击了一样。SendMessage函数中的后两个参数在本例中可以不理，简单置0即可。

Answer 2

是窗体内的模拟
还是全局模拟？