高分！！不移鼠标的情况下怎么发送单击消息！

Question

我是说怎么模拟单击指定点，比如坐标100,100处我知道可以用mouse_event，但这个把鼠标移来移去的！这个是我调试一软件时看到的代码PostMessageA
hWnd = 2B0888
Message = WM_LBUTTONUP
Keys = 0
X = 145. Y = 541用了PostMessage发送消息，最后一个参数是个坐标！！但我不知VB里怎么用这个函数带坐标？？

Answer 1

把PostMessage的声明改一下
用：ByVal lParam As AnyPrivate Declare Function PostMessage& Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Any)
Private Const WM_LBUTTONUP = &H202Private Sub Form_Load()
    Dim t As Long    '高位为Y低位为X
    t = 123 * &H10000 + 234
    PostMessage Me.hwnd, WM_LBUTTONUP, 0&, t
End SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me.Caption = Button & " at " & X & "," & Y
End Sub