Evento Section.MouseDown (Access)

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

Sintaxis

más sencilla.MouseDown (botón, Mayús, X, Y)

expresión Variable que representa un objeto de sección .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Button Obligatorio Integer Botón que se presionó para desencadenar el evento. Si necesita realizar una prueba para 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 El 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 de la tecla Mayús.

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

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

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].

Usa un evento MouseDown para especificar qué sucede cuando se presiona o suelta un botón del mouse en particular. 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 combinaciones de ratón y teclado en las que se 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 puedes 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.

  • Last updated on