Evento NavigationControl.MouseDown (Access)

  • Artículo

El evento MouseDown se produce cuando el usuario presiona un botón del mouse.

Sintaxis

expresión. MouseDown (Button, Shift, X, Y)

Expresión Variable que representa un objeto NavigationControl .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Button Obligatorio Integer Botón que se presionó para desencadenar el evento. Si necesita probar el argumento Button , puede usar una de las siguientes constantes intrínsecas como máscaras de bits:

  • acLeftButton La máscara de bits para el botón primario del mouse.

  • acRightButton La máscara de bits para el botón secundario del mouse.

  • acMiddleButton La máscara de bits para el botón central del mouse.
Shift Obligatorio Integer Estado de las teclas Mayús, Ctrl y Alt cuando se presionó o soltó el botón especificado por el argumento Button . Si necesita probar el argumento Mayús , puede usar una de las siguientes constantes intrínsecas como máscaras de bits:

  • acShiftMask Máscara de bits para la tecla Mayús.

  • acCtrlMask Máscara de bits para la tecla Ctrl.

  • acAltMask Máscara de bits para la tecla Alt.
X Obligatorio Single Coordenada x de la ubicación actual del puntero del mouse, en twips.
Y Obligatorio Single Coordenada y para la ubicación actual del puntero del mouse, en twips.

Valor devuelto

Nothing

Comentarios

El evento MouseDown solo se aplica a formularios, secciones de formulario y controles de un formulario, y no a los controles de un informe.

Este evento no se aplica a una etiqueta asociada a otro control, como la etiqueta de un cuadro de texto. Sólo se aplica a las etiquetas "independientes". La acción de presionar y soltar un botón del mouse en una etiqueta asociada tiene el mismo efecto que presionar y soltar el botón en el control asociado. Se producirán los eventos normales para el control, y ninguno para la etiqueta adjunta.

Para ejecutar una macro o procedimiento de evento cuando se produzcan estos eventos, establezca la propiedad OnMouseDown en el nombre de la macro o en [procedimiento de evento].

Use un evento MouseDown para especificar lo que ocurre cuando se presiona o suelta un botón del mouse determinado. A diferencia de los eventos Click y DblClick, el evento MouseDown permite distinguir entre los botones de la izquierda, derecha y central del mouse. También puede escribir código para las combinaciones de teclado del mouse que usan las teclas Mayús, Ctrl y Alt.

Para que se produzca un evento MouseDown en un formulario, presione el botón del mouse en un área en blanco o selector de registros en el formulario. Para que se produzca un evento MouseDown en una sección de formulario, presione el botón del mouse en un área en blanco de la sección del formulario.

Lo siguiente se aplica a los eventos MouseDown:

  • Si se presiona un botón del mouse mientras el puntero está sobre un formulario o control, ese objeto recibirá todos los eventos de mouse hasta y el último evento MouseUp, inclusive.

  • Si los botones del mouse se presionan en sucesión, el objeto que recibe el evento de mouse después de que se presione el primer botón recibirá todos los eventos de mouse hasta que se suelten todos los botones.

Para responder a un evento provocado al mover el mouse, use un evento MouseMove.

Ejemplo:

En el ejemplo siguiente se muestra cómo averiguar qué botón del mouse provocó un evento MouseDown .

Para probar el ejemplo, agregue el procedimiento de evento siguiente a un formulario.

Private Sub Form_MouseDown(Button As Integer, _ 
 Shift As Integer, X As Single, _ 
 Y As Single) 
 If Button = acLeftButton Then 
 MsgBox "You pressed the left button." 
 End If 
 If Button = acRightButton Then 
 MsgBox "You pressed the right button." 
 End If 
 If Button = acMiddleButton Then 
 MsgBox "You pressed the middle button." 
 End If 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.