MouseDown

<< Clique para Mostrar o Sumário >>

 

MouseDown

MouseDown(Button, ShiftState, MouseX, MouseY)

Ocorre quando se pressiona qualquer botão do mouse na Tela. Utilize o evento MouseDown para determinar ações específicas quando a Tela é clicada pelo usuário. Os parâmetros deste evento estão descritos na tabela a seguir.

Parâmetros disponíveis no evento MouseDown

Nome

Descrição

Button

Mostra o botão do mouse pressionado:

1: O botão do mouse pressionado é o esquerdo

2: O botão do mouse pressionado é o direito

4: O botão do mouse pressionado é o do meio

ShiftState

Mostra a tecla pressionada juntamente com o botão do mouse:

4: Tecla SHIFT

8: Tecla CTRL

12: Teclas CTRL + SHIFT

MouseX

Mostra a coordenada X onde o botão do mouse foi clicado na Tela

MouseY

Mostra a coordenada Y onde o botão do mouse foi clicado na Tela

 

Exemplo:

Sub TelaInicial_MouseDown(Button, ShiftState, MouseX, MouseY)
  ' Mostra uma caixa de mensagem
  ' com as coordenadas do ponteiro do mouse
  MsgBox "Coordenada X: " & MouseX & _
    vbNewLine & "Coordenada Y: " & MouseY
End Sub

Esta página foi útil?