Soyez le premier à donner votre avis sur cette source.
Snippet vu 4 459 fois - Téléchargée 42 fois
'déclarer une variable avec le nom que vous voulez, il est important qu'elle soit déclarée 'avant le bouton dim abc 'Editez le bouton Private Sub button1_Click() 'On increment la variable abc de 1 à chaque clique sur le bouton abc = abc + 1 'si abc = 3 alors on envoie la message box suivante, on peut mettre n'importe quel 'évènement, comme démarrer une application avec "shell" If abc = 3 Then MsgBox "c'est la troisième fois que tu clique ici !" 'Si l'utilisateur reclique après l'évènement précédent, abc devient supérieur à 4 'donc on lui attribu la valeur de 1, il reste encore 2 clique avant de relancé l'évènement 'précédent If abc > 3 Then abc = 1 'voila c finit End Sub
Private Sub Button1_Click()
Static abc as Byte
abc=abc+1
If abc = 3 Then abc=0: MsgBox "c'est la troisième fois que tu cliques ici !"
End Sub
L'avantage de ces variables statiques est qu'elles concervent leur valeur d'un appel de la fonction à l'autre, et sont initialisée par défaut à 0. Bien sûr, avant de déclarer une variable en static, il faut s'assurer que la variable n'est utilisée que par la fonction où elle est déclarée.
@++ et bonne prog...
(: Sibo ;)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.