怎样隐藏光标？
请问，怎样隐藏光标？
2006-01-31 16:21
Option Explicit
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Command1_Click()
Call ShowCursor(1) '显示鼠标
End Sub
Private Sub Command2_Click()
Call ShowCursor(0) '隐藏鼠标
End Sub
2006-01-31 19:31
2006-01-31 21:07