Cómo utilizar un clic del ratón como la acción en Visual Basic

Detección de qué botón se pulsa en un ratón por el usuario le puede dar más información acerca de las acciones a tomar en su programa de Visual Basic. En casi todos los VB control tiene el evento "MouseClick", que se ejecuta cuando el control se hace clic con el ratón. Es útil conocer 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 VB que desea ejecutar cuando un botón del ratón pulsado bajo el evento "MouseClick".

Instrucciones

1 Iniciar 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 Añadir un control de cuadro de texto haciendo doble clic "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 Copiar y pegar el siguiente código dentro del procedimiento "Form1_MouseClick":

Select Case e.Button

Caso es = MouseButtons.Left

MessageBox.Show ( "botón izquierdo del ratón en el Formulario").

Caso es = MouseButtons.Right

MessageBox.Show ( "botón derecho del ratón pulsado en el Formulario").

Caso es = MouseButtons.Middle

MessageBox.Show ( "botón central del ratón pulsado en el Formulario").

End Select

5 Copiar y pegar el siguiente código dentro del procedimiento "TextBox1_MouseClick":

Seleccione la caja e.Button

Case Is = MouseButtons.Left

MessageBox.Show ( "botón izquierdo del ratón sobre el cuadro de texto").

Caso es = MouseButtons.Right

MessageBox.Show ( "botón derecho del ratón pulsado sobre el cuadro de texto").

Caso es = MouseButtons.Middle

MessageBox.Show ( "botón central del ratón presionado en la caja de texto.")

End Select

6 Pulse la tecla "F5" para ejecutar el programa y utilizar cualquier botón del ratón mientras hace clic en la forma o en el cuadro de texto. Un cuadro de mensaje será generado que indica el botón del ratón pulsado.