Detecção de qual botão foi pressionado em um mouse pelo usuário pode dar-lhe mais informações sobre as acções a tomar em seu programa Visual Basic. Em quase todos os VB controle tem o evento " MouseClick ", que é executado quando o controle é clicado pelo mouse. É útil saber o botão pressionado para exibir mais informações, como menus ou caixas de mensagem para o usuário. Você pode adicionar qualquer código VB você deseja executar quando um botão do mouse pressionado sob o evento " MouseClick " . Coisas que você precisa
Microsoft Visual Basic Express
Visualizar Mais instruções
1
Inicie o Microsoft Visual Basic Express , clique em " New Project ... " no painel esquerdo da tela e selecione " Windows Forms Application ". Clique em " OK" para criar um projeto Windows Forms.
2
Adicione um controle de caixa de texto clicando duas vezes " TextBox " do painel de caixa de ferramentas.
3
Com o botão direito do formulário e clique em " Propriedades". Clique no ícone " Eventos ", que se assemelha a um relâmpago. Role para baixo e clique duas vezes ao lado de " MouseClick " para criar um evento de clique do mouse para o formulário . Repita o passo anterior para adicionar um evento de ação clique para o controle de caixa de texto
4
Copie e cole o seguinte código dentro do procedimento " Form1_MouseClick " : .
Selecione Caso e.Button
Case Is = MouseButtons.Left
MessageBox.Show (" botão esquerdo do mouse pressionado no formulário . " )
Case Is = MouseButtons.Right
MessageBox.Show (" botão direito do mouse pressionado no formulário . " )
Case Is = MouseButtons.Middle
MessageBox.Show (" botão do meio do mouse pressionado no formulário . " )
End Select
5
Copiar e colar o seguinte código dentro do procedimento " TextBox1_MouseClick " :
Selecione Caso e.Button
caso
Is = MouseButtons.Left
MessageBox.Show (" botão esquerdo do mouse pressionado na caixa de texto . " )
Case Is = MouseButtons.Right
MessageBox.Show ( botão do mouse " pressionado direito sobre texto caixa ").
Case Is = MouseButtons.Middle
MessageBox.Show (" botão do meio do mouse pressionado na caixa de texto. " )
End Select
< br > 6
Pressione " F5" para executar o programa e utilizar qualquer botão do mouse ao clicar no formulário ou caixa de texto. Uma caixa de mensagem será gerada indica que o botão do mouse pressionado.