Événement OptionGroup.MouseMove (Access)
L’événement MouseMove survient lorsque l’utilisateur déplace la souris.
Syntaxe
expression. MouseMove (Button, Shift, X, Y)
Expression Variable qui représente un objet OptionGroup .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Bouton | Obligatoire | Entier | Bouton activé ou relâché pour déclencher l'événement. Si vous avez besoin de tester l’argument Button , vous pouvez utiliser l’une des constantes intrinsèques suivantes comme masques de bits :
|
Shift | Obligatoire | Integer | État des touches Maj, Ctrl et Alt lorsque le bouton spécifié par l’argument Bouton a été enfoncé ou relâché. Si vous devez tester l’argument Shift , vous pouvez utiliser l’une des constantes intrinsèques suivantes comme masques de bits :
|
X | Obligatoire | Unique | Coordonnée x de l’emplacement actuel du pointeur de la souris, en twips. |
Y | Obligatoire | Unique | Coordonnée y pour l’emplacement actuel du pointeur de la souris, en twips. |
Remarques
L’événement MouseMove s’applique uniquement aux formulaires, sections de formulaire et contrôles d’un formulaire, et non aux contrôles d’un état.
Cet événement ne s'applique pas à une étiquette attachée à un autre contrôle, telle que l'étiquette d'une zone de texte. Il ne s'applique qu'aux étiquettes « autonomes ». Si vous appuyez et relâchez le bouton de la souris dans une étiquette attachée, cela revient à appuyer et à relâcher le bouton dans le contrôle associé. Les événements normaux du contrôle surviennent ; aucun événement différent ne se produit pour l'étiquette attachée.
Pour exécuter une macro ou une procédure événementielle lorsque ces événements se produisent, définissez la propriété OnMouseMove sur le nom de la macro ou [procédure événementielle].
L'événement MouseMove est généré continuellement lorsque le pointeur de la souris se déplace sur les objets. Sauf si un autre objet génère un événement de souris, un objet reconnaît un événement MouseMove lorsque le pointeur de la souris se trouve à l'intérieur de ses bordures.
Pour déclencher un événement MouseMove dans un formulaire se produise, placez le pointeur de la souris sur une zone vierge, un sélecteur d'enregistrement ou une barre de défilement sur le formulaire. Pour déclencher un événement MouseMove pour une section de formulaire, placez le pointeur de la souris sur une zone vierge de la section de formulaire.
Pour répondre à un événement provoqué par le déplacement de la souris, vous utilisez un événement MouseMove.
Pour exécuter une macro ou une procédure événementielle en réponse à la pression et au relâchement des boutons de la souris, vous utilisez les événements MouseDown et MouseUp.
Exemple
L’exemple suivant détermine où se trouve la souris et si le bouton gauche de la souris et/ou la touche Maj sont enfoncés. Les coordonnées x et y du pointeur de la souris s'affichent dans un contrôle de type étiquette lors du déplacement de la souris.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.