S’applique à
Objet BoundObjectFrame |
Objet Label |
Objet Rectangle |
---|---|---|
Objet CheckBox |
Objet ListBox |
Objet Section |
Objet ComboBox |
Objet ObjectFrame |
Collection TabControl |
Objet CommandButton |
Objet OptionButton |
Objet TextBox |
Objet Form |
Objet OptionGroup |
Objet ToggleButton |
Objet Image |
Objet Page |
Définit ou renvoie la valeur de la zone Sur clic dans la fenêtre Propriétés de l’un des objets de la liste S’applique à. Chaîne en lecture/écriture.
expression.SurClic
expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.
Remarques
Cette propriété est utile pour modifier par programme l’action effectuée par Access lorsqu’un événement est déclenché. Par exemple, entre les appels des événements, vous pouvez modifier les paramètres d’une expression, ou passer d’une procédure événementielle à une expression ou à une macro, selon les circonstances de déclenchement de l’événement.
L’événement Clic se produit quand un utilisateur enfonce, puis relâche le bouton gauche de la souris.
La valeur SurClic correspondra à l’une des valeurs suivantes, selon la sélection effectuée dans la fenêtre Choisir Générateur (accessible en cliquant sur le bouton Générer en regard de la zone Sur clic dans la fenêtre Propriétés de l’objet) :
-
En cas de choix du Générateur d’expressions, la valeur est « =expression », où expression correspond à l’expression de la fenêtre Générateur d’expressions.
-
Si Générateur de macro est choisi, la valeur correspondra au nom de la macro.
-
En cas de choix du Générateur de code, la valeur est « [Procédure événementielle] ».
Si la zone Sur clic est vide, la valeur de la propriété est une chaîne vide.
Exemple
L’exemple suivant associe l’événement Clic avec la procédure événementielle « OK_Click » du bouton nommé « OK » sur le formulaire « Order Entry » (Saisie de commande), s’il n’existe actuellement aucune association.
With Forms("Order Entry").Controls("OK")
If .OnClick = "" Then
.OnClick = "[Event Procedure]"
End If
End With