Detectar qué botón se pulsa en un ratón por el usuario le puede dar más información sobre las acciones a tomar en su programa de Visual Basic . En VB casi cada control tiene el evento " MouseClick ", que se ejecuta cuando el control se hace clic con el ratón . Es útil saber el botón presionado para mostrar más información, como los menús o cuadros de mensaje para el usuario. Usted puede agregar cualquier código de VB que desea ejecutar cuando un botón del ratón bajo el evento " MouseClick " . Cosas que necesitará
Microsoft Visual Basic Express
Ver Más instrucciones
1
Inicie Microsoft Visual Basic Express , haga clic en "Nuevo proyecto ... " en el panel izquierdo de la pantalla y luego seleccione " Aplicación de Windows Forms ". Haga clic en " Aceptar" para crear un proyecto de Windows Forms.
2
Agregar un control de cuadro de texto haciendo doble clic en " cuadro de texto " en el panel de herramientas.
3
Haga clic en el formulario y haga clic en " Propiedades". Haga clic en el icono de "Eventos" que se asemeja a un rayo. Desplácese hacia abajo y haga doble clic al lado de " MouseClick " para crear un evento de clic del ratón para el formulario . Repita el paso anterior para agregar un evento de acción de clic para el control de cuadro de texto
4
Copia y pega el siguiente código dentro del procedimiento " Form1_MouseClick ": .
Select Case e.Button
Case Is = MouseButtons.Left
MessageBox.Show ( " botón izquierdo del ratón presionada en el formulario . " )
Case Is = MouseButtons.Right
MessageBox.Show ( " botón derecho del ratón en el Formulario prensada . " )
Case Is = MouseButtons.Middle
MessageBox.Show ( "el botón central del ratón en el Formulario presionado ").
< p> End Select
5
Copia y pega el siguiente código dentro del procedimiento " TextBox1_MouseClick ":
Select Case e.Button
caso es = MouseButtons.Left
MessageBox.Show ( "pulsado el botón izquierdo del ratón en el cuadro de texto. " )
Case Is = MouseButtons.Right " botón derecho del ratón presionada en el texto
MessageBox.Show ( caja ". )
Case Is = MouseButtons.Middle
MessageBox.Show ( " botón central del ratón en el cuadro de texto pulsado " . )
End Select
< br > 6 Pulse
"F5 " para ejecutar el programa y utilizar cualquiera de los botones del ratón al hacer clic en la forma o en el cuadro de texto. Un cuadro de mensaje se generará indicando el botón del ratón pulsado .
