2016.03.07 14:32
Private 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)
Const MOUSEEVENTF_RIGHTDOWN
= &H8
Const MOUSEEVENTF_RIGHTUP
= &H10
Const MOUSEEVENTF_LEFTDOWN
= &H2