Свойство Screen.MousePointer (Access)

Используйте свойство MousePointer вместе с объектом Screen , чтобы указать или определить тип отображаемого в данный момент указателя мыши. Для чтения и записи, Integer.

Синтаксис

expression. MousePointer

Выражение Переменная, представляющая объект Screen .

Замечания

Параметр свойства MousePointer представляет собой целочисленное значение, представляющее один из следующих указателей.

Setting	Описание
0	(по умолчанию) Форма определяется Microsoft Access.
1	Обычный выбор (стрелка)
3	Выделение текста (I-Beam)
7	Вертикальное изменение размера (размер N, S)
9	Горизонтальное изменение размера (размер E, W)
11	Занят (песочные часы)

Примечание.

Если для свойства MousePointer задано целое число, отличное от того, которое отображается в предыдущей таблице, свойство будет иметь значение 0.

Свойство MousePointer влияет на внешний вид указателя мыши на весь экран. Некоторые пользовательские элементы управления имеют свойство MousePointer , которое, если оно задано, указывает, как отображается указатель мыши при его расположении над элементом управления.

Чтобы указать, что приложение занято, можно использовать свойство MousePointer , задав для свойства значение 11, чтобы отобразить значок песочных часов. Вы также можете прочитать свойство MousePointer, чтобы определить, что отображается. Это может быть полезно, если вы хотите запретить пользователю выбирать кнопку команды, пока указатель мыши отображает значок песочных часов.

Задание для свойства MousePointer значения 11 аналогично передаче аргумента True (1) методу Hourglass объекта DoCmd . И наоборот, передача аргумента True методу Hourglass также задает для свойства MousePointer значение 11.

Пример

В следующем примере указатель мыши изменяется на песочные часы.

Screen.MousePointer = 11

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.