syltouille
Messages postés20Date d'inscriptionjeudi 7 février 2002StatutMembreDernière intervention26 juillet 2004
-
28 févr. 2003 à 14:14
DadaPik
Messages postés33Date d'inscriptionjeudi 13 février 2003StatutMembreDernière intervention 4 mars 2003
-
1 mars 2003 à 13:15
Voila je voulais savoir comment faire un petit exercice tout simple.
J'ai un formulaire avec 2 boutons, un pour compter et l'autre pour arreter de compter.
J'aimerais savoir comment je peut reprendre la main sur mon formulaire pour pouvoir appuyer sur mon bouton arreter,
et puis j'aierais savoir comment dans mon programme je peut lui dire arrete de compter si j'appuis sur Arreter.
Je suppose que pour beaucoup d'entre vous il vous semblera facile de faire ca mais je suis super debutant en VB et bon...
PatriceVB
Messages postés562Date d'inscriptiondimanche 16 décembre 2001StatutModérateurDernière intervention26 décembre 2007 28 févr. 2003 à 15:34
comment tu fais pour compter ? il me semble bizarre que tu n'es plus la main... Précise ta question pour que l'on puisse te répondre. Et tu comptes koi enplus ? les moutons qui passent ? :-)
Précise ta question...
@+
DadaPik
Messages postés33Date d'inscriptionjeudi 13 février 2003StatutMembreDernière intervention 4 mars 2003 28 févr. 2003 à 16:26
T'as du faire une boucle, et ca demande trop au processeur, donc, mais un timer pour ke la boucle s'execute moins rapidement, et ainsi, tu auras la main.
syltouille
Messages postés20Date d'inscriptionjeudi 7 février 2002StatutMembreDernière intervention26 juillet 2004 28 févr. 2003 à 17:46
Oui c'est ca je fais une boucle 'do while' et ca s'excecute comment un timer. Sinon je compte tout simplement.
Mon bouton me permet de faire 1 + 1 + 1 + 1 + etc et tant que je n'ai pas atteint mon chiffre (on va dire 100000) je fais ma boucle et c'est pendant que j'excecute cette boucle que j'aimerais que mon autre bouton arrete cette boucle.
Je sais c'est tres bete comme exercice mais c'est pour apprendre et la je bloque un peu alors je demande conseil a vous messieurs.
DadaPik
Messages postés33Date d'inscriptionjeudi 13 février 2003StatutMembreDernière intervention 4 mars 2003 1 mars 2003 à 13:15
Sur ta feuille, tu met :
-un bouton Command1
-unbouton command2
-un timer
Propriétés du timer :
Enabled= false
interval = 100 (nbre de millesecondes entre chaque action du timer, tu pourras le faire varier aprés.
Dim I As Long
Private Sub Command1_Click()
I = 0
Timer.Enabled = True
End Sub
Private Sub Command2_Click()
Timer.Enabled = False
End Sub