vb，窗体上一个点的坐标是 100 200，如何让 鼠标在这个位置自动点击一下，下列代码怎么没反应呀

Question

vb，窗体上一个点的坐标是 100 200，如何让 鼠标在这个位置自动点击一下，下列代码怎么没反应呀，大家指点一下，多谢了'通用声明
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)
Private Const MOUSEEVENTF_LEFTDOWN = &H2
Private Const MOUSEEVENTF_LEFTUP = &H4Private Sub Command4_Click()
mouse_event MOUSEEVENTF_LEFTDOWN, 100, 200, 0, 0
End Sub

Answer 1

Private Sub Command4_Click()
mouse_event MOUSEEVENTF_LEFTDOWN, 100, 200, 0, 0
mouse_event MOUSEEVENTF_LEFTUP, 100, 200, 0, 0
End Sub
?

Answer 2

mouse_event 用的是全局坐标，而窗口用的是相对局部坐标。
你必须先取得窗口在屏幕中的坐标位置，再计算窗口客户区域的位置加以坐标偏移才可以

Answer 3

移动鼠标，最好用SetCursorPos来实现

Answer 4

谢谢回答，您好，能否给点代码呀，例如我想在屏幕坐标200,300的地方，鼠标左键点击一下，SetCursorPos该怎样写代码呀。