Evento Label.MouseMove (Access)

El evento MouseMove se produce cuando el usuario mueve el mouse.

Sintaxis

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

Expresión Variable que representa un objeto Label .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Button	Obligatorio	Integer	Botón que se presionó o se soltó cuando se desencadenó 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.

Comentarios

El evento MouseMove 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 OnMouseMove en el nombre de la macro o en [procedimiento de evento].

El evento MouseMove se genera continuamente mientras el puntero del mouse se mueve sobre objetos. A menos que otro objeto genere un evento de mouse (ratón), un objeto reconoce un evento MouseMove siempre que se coloca el puntero del mouse dentro de sus bordes.

Para provocar un evento MouseMove en un formulario que se produzca, mueva el puntero del mouse sobre un área en blanco, el selector de registros o la barra de desplazamiento en el formulario. Para que se produzca un evento MouseMove en una sección de formulario, mueva el puntero del mouse sobre una zona en blanco de la sección del formulario.

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

Para ejecutar una macro o procedimiento de evento como respuesta a presionar y soltar los botones del mouse, use los eventos MouseDown y MouseUp.

Ejemplo:

En el ejemplo siguiente se determina dónde está el mouse y si se presiona el botón izquierdo del mouse o la tecla Mayús. Las coordenadas X e Y correspondientes a la posición del puntero del mouse se muestran en un control de etiqueta al mover el mouse.

Private Sub Detail_MouseMove(Button As Integer, _ 
     Shift As Integer, X As Single, Y As Single) 
    Dim intShiftDown As Integer, intLeftButton As Integer 
 
    Me!Coordinates.Caption = X & ", " & Y 
    ' Use bit masks to determine state of 
    ' SHIFT key and left button. 
    intShiftDown = Shift And acShiftMask 
    intLeftButton = Button And acLeftButton 
    ' Check that SHIFT key and left button  
    ' are both pressed. 
    If intShiftDown And intLeftButton > 0 Then 
        MsgBox "Shift key and left mouse button were pressed." 
    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.