Autor
Código:
Const WM_LBUTTONDOWN = &H201
Const WM_LBUTTONUP = &H202
Private Declare Function PostMessageBynum Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
Private Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Private Sub Command2_Click()
l = PostMessageBynum(Check1.hwnd, WM_LBUTTONDOWN, 0&, PosXY)
l = PostMessageBynum(Check1.hwnd, WM_LBUTTONUP, 0&, PosXY)
End Sub
pero pareciera q clickear fuera de la aplicacion de vb es facil pero no se como, alguna idea para clickear fuera de la aplicacion? osea en cualquier lugar salu2s
En línea
