Помогите погасить указатель мыши - VB
Формулировка задачи:
Необходимо на определённое событие убирать с формы указатель мыши, не просто убирать а гасить его на ней? Люди дайте совет, не будьте редисками
Решение задачи: «Помогите погасить указатель мыши»
textual
Листинг программы
- Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
- Private Sub Command1_Click()
- 'спрятать курсор
- ShowCursor 0
- End Sub
- Private Sub Command2_Click()
- 'показать курсор ( нажимать TAB и "Space")
- ShowCursor 1
- End Sub
- Private Sub Form_Unload(Cancel As Integer)
- 'показать курсор при закрытии программы
- ShowCursor 1
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
