postmessage怎么模拟鼠标后台单击!谢谢了

解决方案 »

  1.   

    那些根本不起作用!给个网址, POSTMESSAGE (HWND,MSG,X,X)
    XX两个是怎么填,坐标吗,可是根本不到位
      

  2.   

    楼主还是去用一些脚本工具,已经很成熟了,例如au3等。not autohotkey!
      

  3.   

    Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
    Private Const WM_LBUTTONDOWN = &H201
    Private Const WM_LBUTTONUP = &H202
    Private Sub Command1_Click()
        MsgBox "123"
    End SubPrivate Sub Command2_Click()
        PostMessage Command1.hwnd, WM_LBUTTONDOWN, 0, 0
        PostMessage Command1.hwnd, WM_LBUTTONUP, 0, 0
    End Sub