Evento Form.MouseDown (Access)
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 Form.
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:
|
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:
|
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. |
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.