Type POINTAPI
x As Long
y As Long
End Type
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" _
(lpPoint As POINTAPI) As Long
'隐藏Mouse
Public Sub toHideCursor()
ShowCursor 0
End Sub
'显示Mouse
Public Sub toShowCursor()
ShowCursor 1
End Sub
时间: 2024-12-28 19:33:52