MyTetra Share
Делитесь знаниями!
Курсор Мыши - Показать "Часики"
Время создания: 16.03.2019 23:43
Раздел: !Закладки - VBA - Access - msa.polarcom.ru - 09 Интерфейс
Запись: adgaver/mytetra_base_New/master/base/1532016751d4bo4p6dqj/text.html на raw.githubusercontent.com

Курсор Мыши - Показать "Часики"

В обычной ситуации Access и сам часы показывает неплохо - но если уж использовать это - то главное не забыть возвращать нормальный курсор (особенно при возникновении ошибок)- ибо часами по кнопкам щелкать не удобно.... :)

On Error GoTo ErrorPoint

DoCmd.Hourglass True 'Показать часики

'....

'куча всяких громоздких инструкций

'....

DoCmd.Hourglass False 'Вернуть нормальный курсор

Exit Sub


ErrorPoint:

DoCmd.Hourglass False 'Вернуть нормальный курсор

MsgBox Err.Description



Так же в этом разделе:
 
MyTetra Share v.0.55
Яндекс индекс цитирования