4
Январь
2009
Как скрыть/показать курсор?
Как скрыть/показать курсор?
Option Explicit
Private Declare Function ShowCursor Lib _
"user32" (ByVal bShow As Long) As Long
Private Sub Command1_Click()
ShowCursor 0
End Sub
Private Sub Command2_Click()
ShowCursor 1
End Sub