windows系统，原来我用的是狐表开发版，现在用的是高开版。跟这个有关系吗？原来用的win7 32位，现在用的win10，64位。有影响吗？
如何做兼容
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 const MOUSEEVENTF_MOVE As Int32 = &H1 ' mouse move
Public const MOUSEEVENTF_LEFTDOWN As Int32 = &H2 ' left button down
Public const MOUSEEVENTF_LEFTUP As Int32 = &H4 ' left button up
Public const MOUSEEVENTF_RIGHTDOWN As Int32 = &H8 ' right button down
Public const MOUSEEVENTF_RIGHTUP As Int32 = &H10 ' right button up
Public const MOUSEEVENTF_MIDDLEDOWN As Int32 = &H20 ' middle button down
Public const MOUSEEVENTF_MIDDLEUP As Int32 = &H40 ' middle button up
Public const MOUSEEVENTF_ABSOLUTE As Int32 = &H8000 ' absolute move
Public const MOUSEEVENTF_WHEEL As Int32 = &H800 ' wheel button rolled
<DllImport("user32.dll", EntryPoint := "SetCursorPos")> _
Public Function SetCursorPos(x As Integer, y As Integer) As Boolean
End Function
[此贴子已经被作者于2019/8/14 10:50:13编辑过]
加好友 
发短信
Post By：2019/8/13 15:27:00 [只看该作者]
