Private Declare Function SendMessage& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any)Private Const WM_RBUTTONDOWN As Long = &H204
Private Const WM_RBUTTONUP As Long = &H205
Dim lParam As Long
lParam = y * &H10000 Or x
SendMessage hWndTarget, WM_RBUTTONDOWN, 0, lParam
SendMessage hWndTarget, WM_RBUTTONUP, 0, lParam如下
跪求答案
Private Const WM_RBUTTONUP As Long = &H205
Dim lParam As Long
lParam = y * &H10000 Or x
SendMessage hWndTarget, WM_RBUTTONDOWN, 0, lParam
SendMessage hWndTarget, WM_RBUTTONUP, 0, lParam如下
跪求答案
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货