Propriedade Screen.MousePointer (Access)
Use a propriedade MousePointer junto com o objeto Screen para especificar ou determinar o tipo de ponteiro do mouse exibido atualmente. número inteiro de leitura/gravação.
Sintaxe
expressão. Mousepointer
Expressão Uma variável que representa um objeto Screen .
Comentários
A configuração da propriedade MousePointer é um valor Integer que representa um dos ponteiros a seguir:
| Configuração | Descrição |
|---|---|
| 0 | (Padrão) A forma é determinada pelo Microsoft Access. |
| 1 | Seleção Normal (Seta) |
| 3 | Seleção de Texto (Forma de I) |
| 7 | Redimensionamento Vertical (Tamanho N, S) |
| 9 | Redimensionamento Horizontal (Tamanho L, O) |
| 11 | Ocupado (Ampulheta) |
Observação
A configuração da propriedade MousePointer como um inteiro diferente dos exibidos na tabela anterior definirá a propriedade como 0.
A propriedade MousePointer afeta a aparência do ponteiro do mouse na tela inteira. Alguns controles personalizados têm uma propriedade MousePointer que, se definida, especificará o modo de exibição do ponteiro do mouse quando ele for posicionado sobre o controle.
Utilize a propriedade MousePointer para indicar que o seu aplicativo está ocupado, definindo a propriedade como 11 para exibir um ícone de ampulheta. Você também pode ler a propriedade MousePointer para determinar o que está sendo exibido. Isso pode ser útil se você quiser impedir que um usuário escolha um botão de comando enquanto o ponteiro do mouse estiver exibindo um ícone de ampulheta.
Definir a propriedade MousePointer como 11 é o mesmo que passar o argumento True (1) para o método Hourglass do objeto DoCmd . Por outro lado, passar o argumento True para o método Hourglass também define a propriedade MousePointer como 11.
Exemplo
O exemplo a seguir altera o ponteiro do mouse para uma ampulheta.
Screen.MousePointer = 11
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.