Événement TextBox.MouseDown (Access)
L'événement MouseDown se produit lorsque l'utilisateur appuie sur un bouton de la souris.
Syntaxe
expression. MouseDown (Button, Shift, X, Y)
Expression Variable qui représente un objet TextBox .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Bouton | Obligatoire | Entier | Bouton activé 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 MouseDown 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é OnMouseDown sur le nom de la macro ou [procédure événementielle].
Utilisez un événement MouseDown pour spécifier ce qui se passe lorsqu’un bouton de souris particulier est enfoncé ou relâché. Contrairement aux événements Click et DblClick, l'événement MouseDown vous permet de faire la distinction entre les boutons gauche, droit et central de la souris. Vous pouvez également écrire du code pour les combinaisons souris-clavier qui utilisent les touches Maj, Ctrl et Alt.
Pour déclencher un événement MouseDown dans un formulaire, appuyez sur le bouton de la souris dans une zone vierge ou un sélecteur d'enregistrement du formulaire. Pour déclencher un événement SourisAppuyée pour une section de formulaire, appuyez sur le bouton de la souris dans une zone vierge de la section de formulaire.
Les actions suivantes s'appliquent aux événements MouseDown:
Si un bouton de la souris a été enfoncé pendant que le pointeur se trouve sur un formulaire ou un contrôle, cet objet reçoit tous les événements de souris jusqu'à et y compris le dernier événement MouseUp.
Si vous appuyez successivement sur les boutons de la souris, l'objet qui reçoit l'événement de la souris consécutif au premier clic recevra tous les événements suivants jusqu'à ce que tous les boutons soient relâchés.
Pour répondre à un événement provoqué par le déplacement de la souris, vous utilisez un événement MouseMove.
Exemple
L’exemple suivant montre comment déterminer quel bouton de souris a provoqué un événement MouseDown .
Pour essayer cet exemple, ajoutez au formulaire la procédure événementielle ci-dessous.
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
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.