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

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

VB code

'通用声明
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 = &H4

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

------解决方案--------------------
Private Sub Command4_Click()
mouse_event MOUSEEVENTF_LEFTDOWN, 100, 200, 0, 0
mouse_event MOUSEEVENTF_LEFTUP, 100, 200, 0, 0
End Sub
?


------解决方案--------------------
mouse_event 用的是全局坐标，而窗口用的是相对局部坐标。
你必须先取得窗口在屏幕中的坐标位置，再计算窗口客户区域的位置加以坐标偏移才可以
------解决方案--------------------
移动鼠标，最好用SetCursorPos来实现