VB6 代码管家-隐藏鼠标2024年12月8日 22:40
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Command1_Click() '可见
ShowCursor True
End Sub
Private Sub Command2_Click() '不可见
ShowCursor False
End SubPrivate Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Command1_Click() '可见
ShowCursor True
End Sub
Private Sub Command2_Click() '不可见
ShowCursor False
End Sub
全部回复（0）