DÉCLENCHER UN ÉVÈNEMENT LORSQ'UNE ACTION EST EFFECTUÉE UN CERTAIN NOMBRE DE FOIS

yoman64 Messages postés 962 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 2 août 2010 - 2 juin 2002 à 04:00
lolokill666 Messages postés 28 Date d'inscription samedi 4 mai 2002 Statut Membre Dernière intervention 14 août 2002 - 6 juin 2002 à 20:30
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/3514-declencher-un-evenement-lorsq-une-action-est-effectuee-un-certain-nombre-de-fois

lolokill666 Messages postés 28 Date d'inscription samedi 4 mai 2002 Statut Membre Dernière intervention 14 août 2002
6 juin 2002 à 20:30
Merci du conseil ;) Je vais mettre ton code dans mon prog, ca l'améliorera un petit peu :)
SibosisITS Messages postés 72 Date d'inscription mardi 26 février 2002 Statut Membre Dernière intervention 20 juin 2003
3 juin 2002 à 11:11
Bien joué ! Mais tu pourrais améliorer un peu la procédure en déclarant la variable, non pas au niveau module, mais au niveau de la fonction, en variable statique, et expliciter un type de donnée, pour occuper un minimum de mémoire (un programmeur cherche toujours à optimiser l'espace mémoire occupé par son programme). En l'occurence, le type 'Byte' suffit puisque la valeur maximale prise par la variable est 4. Egalement, on peut initialisé la variable à 0 dès qu'elle vaut 3, ce qui permet de supprimer un test, et donc de condenser le code. On obtient le code suivant :

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 ;)
lolokill666 Messages postés 28 Date d'inscription samedi 4 mai 2002 Statut Membre Dernière intervention 14 août 2002
2 juin 2002 à 09:11
Ben oue, mais g remarquer ke y'avait po grand chose pour les débutant ici, il est donc très difficil d'apprendre a faire du vb. Ce genre de code permet aux newbie (comme moi ;)) de comprendre le principe de base du VB
yoman64 Messages postés 962 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 2 août 2010 2
2 juin 2002 à 04:00
C'est pour les méga débutants :)
Rejoignez-nous