Question

请问vb如何模拟鼠标动作

Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

上面的那个api错没错哦,而且鼠标点击的坐标还要是不在vb程序窗口范围中的.鼠标的点击的的语句该怎么写哦.谢谢了.

Answer 1

SetCursorPos(x,y) '这是鼠标位置,也是api函数
Mouse_Event(MOUSEEVENTF_LEFTDOWN,X,Y,0,0) '单击事件
Mouse_Event(MOUSEEVENTF_LEFTUP,X,Y,0,0)

双击就模拟两次