我想用sendMessage发送鼠标消息，请问如何设置wParam和lParam?

Question

我想用sendMessage发送鼠标消息，比如模拟鼠标左键在点(10,20)按下：
Call SendMessage(Me.hwnd, WM_LBUTTONDOWN, ?, ?)请问如何设置wParam和lParam? (一定要指定鼠标的坐标)

Answer 1

wParam ：MK_CONTROL、MK_LBUTTON、MK_MBUTTON、MK_RBUTTON、MK_SHIFT
lParam ：低位两个字节为 x 坐标，高位两个字节为 y 坐标。

Answer 2

你可以用这两个函数啊!Public 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)
Public Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As LongPublic Sub Click()
   SetCursorPos 10, 20
   mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
   mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub