Quando se trata de eventos de clique do mouse em Visual Basic, muito do trabalho de lidar com eles já é feito para você . A maioria dos controles em Visual Basic tem o " Click ", " MouseDown " e "" eventos MouseUp que você pode usar para controlar o programa quando o usuário clica com o mouse . Além disso, você pode usar o " MouseEventArgs " propriedades da classe para fornecer dados adicionais para esses eventos , tais como qual botão do mouse o usuário pressionou ou as coordenadas do mouse no formulário. Depois de criar um novo projeto Visual Basic , você pode fazer eventos de clique do mouse em diversas maneiras. Instruções
Clique Evento
1

Clique duas vezes no controle de "Button" na caixa de ferramentas para adicionar "Button1 " para o formulário.
2

Clique duas vezes " Button1 "para abrir o " Button1_Click " janela de código
3

Digite o seguinte: .

MsgBox (" Você clicou no botão " , MsgBoxStyle.Information " ! Clique no botão " )

Quando o usuário clica em Button1 , uma caixa de informação com a mensagem exibida. Substitua este código com mais prático, como uma chamada para outra função , alteração de valores em etiquetas ou caixas de texto , ou solicitar ao usuário para obter mais informações.
Rato baixo e para cima
4

clique duas vezes no controle " etiqueta " na caixa de ferramentas para adicionar " Label1 " para o formulário. Altere a propriedade de texto para "Você não clicou no rótulo. " Abra a janela de código
5

Abra a função " Label1_MouseDown " e digite o seguinte: .

Label1.Text = " . Você está clicando no rótulo "

o rótulo exibe esta mensagem quando o usuário clica no rótulo
6

Abra a função " label1_MouseUp " e digite o seguinte: .

Label1.Text = " Você parou clicando sobre o rótulo de "

Os rótulo exibe esta mensagem quando o usuário solta o botão do mouse
7

Abra o arquivo. " função Label1_MouseLeave " e digite o seguinte: .

Se Label1.Text = " Você parou de clicar na etiqueta. " Então

Label1.Text = " Você clicou no rótulo. "

End If

Os etiqueta exibe esta mensagem se o usuário já tiver clicado no rótulo e , em seguida, lançou o botão do mouse, em seguida, move o ponteiro do mouse para fora do próprio rótulo.
MouseEventArgs Classe
8

clique duas vezes no controle " etiqueta " na caixa de ferramentas seis vezes a adicionar seis rótulos para o formulário, com o nome " Label1 " para " Label6 ".
9

Organize as etiquetas verticalmente sobre o formulário para que Label1 está no topo e Label6 é na parte inferior.

10

Abra a função " Form1_MouseClick " e digite o seguinte:

Label1.Text = " Button: " & e.Button.ToString

Label2.Text = " Cliques : "& e.Clicks

Label3.Text =" posição X : "& eX

Label4.Text =" posição Y : "& eY

Label5.Text = " Localização :" & e.Location.ToString

Label6.Text = " Delta :" & e.Delta

Quando o usuário clica no formulário, cada propriedade MouseEventArgs é exibida em um dos os seis rótulos . Isso mostra qual botão o usuário clicou , quantas vezes ele clicou ele , a coordenada x , a coordenada x , o xy- coordena junto eo valor delta , que conta quantas vezes a roda gira mouse. Convertendo o botão e localização propriedades para cordas permite ao usuário ver claramente os valores.