Eventos MouseDown, MouseUp
Ocorre quando o usuário clica em um botão do mouse. MouseDown ocorre quando o usuário pressiona o botão do mouse; MouseUp ocorre quando o usuário solta o botão do mouse.
Sintaxe
Para MultiPage, TabStrip
Private Subobject _MouseDown(indexAs Long,
Botão ByValComo fmButton,
ByValShiftComo fmShiftState,
ByValXComo Único,
ByValYComo Único)Subobjeto privado _MouseUp(índiceTão Longo,
Botão ByValComo fmButton,
ByValShiftComo fmShiftState,
ByValXComo Único,
ByValYcomo único)
Para outros controles
Private Subobject _MouseDown( ByValButtonAs fmButton,
ByValShiftComo fmShiftState,
ByValXComo Único,
ByValYComo Único)Sub objetoprivado _MouseUp( Botão ByValcomo fmButton,
ByValShiftComo fmShiftState,
ByValXComo Único,
ByValYcomo único)
As sintaxes dos eventos MouseDown e MouseUp apresentam estas partes:
Sair | Descrição |
---|---|
objeto | Obrigatório. Um objeto válido. |
index | Obrigatório. O índice da página ou separador numa MultiPage ou TabStrip com o evento especificado. |
Button | Obrigatório. Um valor inteiro que identifica qual botão do mouse causou o evento. |
Shift | Obrigatório. O estado de SHIFT, CTRL e ALT. |
X, Y | Obrigatório. A posição horizontal ou vertical, em pontos, a partir da margem esquerda ou superior do formulário, Moldura ou Página. |
Configurações
As configurações de Button são:
Constant | Valor | Descrição |
---|---|---|
fmButtonLeft | 1 | O botão esquerdo foi pressionado. |
fmButtonRight | 2 | O botão direito foi pressionado. |
fmButtonMiddle | 4 | O botão do meio foi pressionado. |
As configurações de Shift são:
Valor | Descrição |
---|---|
1 | SHIFT foi pressionada. |
2 | CTRL foi pressionada. |
3 | SHIFT e CTRL foram pressionadas. |
4 | ALT foi pressionada. |
5 | ALT e SHIFT foram pressionadas. |
6 | ALT e CTRL foram pressionadas. |
7 | ALT, SHIFT e CTRL foram pressionadas. |
É possível identificar modificadores de teclado individuais usando as seguintes constantes:
Constant | Valor | Descrição |
---|---|---|
fmShiftMask | 1 | Máscara para detectar SHIFT. |
fmCtrlMask | 2 | Máscara para detectar CTRL. |
fmAltMask | 4 | Máscara para detectar ALT. |
Comentários
Para uma Página Múltipla, o evento MouseDown ocorre quando o utilizador prime um botão do rato sobre o controlo.
Para uma TabStrip, o argumento de índice identifica o separador em que o utilizador clicou. Um índice de -1 indica que o utilizador não clicou num separador. Por exemplo, se não existirem separadores no canto superior direito do controlo, clicar no canto superior direito define o índice como -1.
Para um formulário, o usuário pode gerar eventos MouseDown e MouseUp pressionando e soltando um botão do mouse em uma área em branco, o seletor de registro ou a barra de rolagem no formulário.
A sequência de eventos relacionados ao mouse é:
- MouseDown
- MouseUp
- Click
- DblClick
- MouseUp
Os procedimentos dos eventos MouseDown ou MouseUp especificam as ações que ocorrem quando um botão do mouse é pressionado ou solto. Os eventos MouseDown e MouseUp permitem distinguir entre os botões do meio, esquerdo e direito do mouse. Também é possível escrever código para combinações de mouse e teclado que usam os modificadores de teclado SHIFT, CTRL e ALT.
Se um botão do mouse é pressionado enquanto o ponteiro estiver sobre um formulário ou controle, esse objeto "captura" o mouse e recebe todos os eventos de mouse até e incluindo o último evento MouseUp. Isso significa que as coordenadas de mouse-ponteiro X e Y retornadas por um evento do mouse podem não estar sempre dentro dos limites do objeto que as recebe.
Se os botões do mouse forem pressionados sucessivamente, o objeto que capturar os eventos do mouse receberá todos os eventos do mouse sucessivos até todos os botões sejam soltos.
Use o argumento Shift para identificar o estado de SHIFT, CTRL e ALT quando ocorreu o evento MouseDown ou MouseUp. Por exemplo, se as teclas CTRL e ALT forem pressionadas, o valor de Shift será 6.
Confira também
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.