Помогите погасить указатель мыши - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д