Problème de débutant

florian - 29 juin 2001 à 18:01
 RememberTheKing - 30 juin 2001 à 11:39
Bonjour à tous,

mon problème de débutant est le suivant: sur 1 label j'essai de faire un compteur pour une animation toute simple.
Sur le clic d'un bouton le code est le suivant

dim a,b,j as long
a=1
b=2
for j=1 to 100
a=a+1
b=b+1
label1.text= a & " " & b
next j
il ne se passe rien sauf à la fin de la boucle ou il m'inscrit les 2 chiffres.
Ce que je souhaite c'est que pendant le décompte je puisse voir les chiffres défiler et pas à la fin.
Si quelqu'un peut m'aider je le remercie d'avance.
Florian

2 réponses

C normal que tu ne vois pas le défilement à l'interieur de ton label. Le temps pour faire la boucle est très rapide, tu ne peux pas le voir, c'est pourquoi tu ne vois que le resultat à la fin.
Pour résoudre ce probleme, il faut que tu utilises un Timer, que tu initialise à 1000 dans Interval, c'est à dire 1 secondes, puis tu mets ce code dans la :

a = a+1
b = b+1
label1.text= a & " " & b

Voila normalement ca devrait fonctionner, si tu veux que le compteur aille plus vite, tu reduis l'interval, ce qui aura pour effet de faire le code plus souvent.

Voila,
RedField @+
0
RememberTheKing
30 juin 2001 à 11:39
A Chaque boucle Refresh ta Form
Form.Refresh
0
Rejoignez-nous