Question

VB实现自动单击鼠标左键的代码是什么?

Answer 1

有两种方法实现:
1. mouse_event
函数功能：该函数综合鼠标击键和鼠标动作。在Windows NT/2000/XP中，该函数已经被取消，使用SendInput函数代替。 　　函数原型： 　　VOID mouse_event( 　　DWORD dwFlags, // motion and click options 　　DWORD dx, // horizontal position or change 　　DWORD dy, // vertical position or change 　　DWORD dwData, // wheel movement 　　ULONG_PTR dwExtraInfo // application-defined information 　　);
http://baike.baidu.com/view/1080208.html
2. SendMessage
函数功能
　　该函数将指定的消息发送到一个或多个窗口。此函数为指定的窗口调用窗口程序，直到窗口程序处理完消息再返回。而函数PostMessage不同，将一个消息寄送到一个线程的消息队列后立即返回。编辑本段函数原型
　　LRESULT SendMessage（HWND hWnd，UINT Msg，WPARAM wParam，LPARAM IParam）； 　　参数： 　　hWnd：其窗口程序将接收消息的窗口的句柄。如果此参数为HWND_BROADCAST，则消息将被发送到系统中所有顶层窗口，包括无效或不可见的非自身拥有的窗口、被覆盖的窗口和弹出式窗口，但消息不被发送到子窗口。 　　Msg：指定被发送的消息。 　　wParam：指定附加的消息指定信息。 　　IParam：指定附加的消息指定信息。 　　返回值：返回值指定消息处理的结果，依赖于所发送的消息。

Answer 2

用winapi函数:mouse_event，模拟键盘:keybd_event，具体参数见网络

Answer 3

call 控件名_click()