'Добавьте 1 CommandButton на форму. Вызов функции как ShowCursor& 0 - 'скроет курсор, вызов как ShowCursor& 1 - покажет курсор. Данная API-функция 'не всегда срабатывает. Я не знаю, почему. Если у вас есть объяснение, 'напишите.
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Command1_Click() ShowCursor 0 'Скрыть курсор End Sub
Private Sub Form_Unload(Cancel As Integer) ShowCursor 1 'Показать курсор End Sub
Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Скрыть/показать курсор мыши", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!