samdd2005
Messages postés9Date d'inscriptionmardi 12 mai 2009StatutMembreDernière intervention26 mai 2009
-
12 mai 2009 à 20:21
nhervagault
Messages postés6063Date d'inscriptiondimanche 13 avril 2003StatutMembreDernière intervention15 juillet 2011
-
12 mai 2009 à 23:53
sil vous plait comment une fait une boucle pour une programme
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 12 mai 2009 à 20:31
Salut
Commence par taper "boucle" dans l'aide de VB6 et il t'expliquera comment faire
La recherche de "boucle" dans la recherche du site parmi les codes en excluant .Net donne aussi des tas d'exemples
Exemple de base :
For r = 1 To 10
MsgBox r
Next r
Vala
Jack, MVP VB NB : Je ne répondrai pas aux messages privés
<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
samdd2005
Messages postés9Date d'inscriptionmardi 12 mai 2009StatutMembreDernière intervention26 mai 2009 12 mai 2009 à 21:01
voila le problemme:
provate sub command_click
dim i as interger
for i =1 to 100
dim EBII as double
EBII =text1.text
dim i as double
i=texte2.text
dim n
n =text3.text
dim segma as interger
segma=text10.text
²resultat EBI
²Dim EBI
EBI=(i*EBII)/n
Mayzz
Messages postés2813Date d'inscriptionmardi 15 avril 2003StatutMembreDernière intervention 2 juin 202028 12 mai 2009 à 21:11
provate sub command_click <<= ne rique pas de finctionner (Private)
dim i as interger
for i =1 to 100 <=== une boucle for doit se terminer par Next (Ou Next i dans le cas présent)
dim EBII as double
EBII =text1.text
dim i as double <== Tu fais une double déclaration ta variable i est déja déclaré plus haut et te sert pour la boucle, change de nom de variable (y, x, ou ce que tu veux...)
i=texte2.text
dim n
n =text3.text
dim segma as interger
segma=text10.text
²resultat EBI <== Visaul basic n'est pas word, en programmation si tu te trompe d'un caractère le programme ne reconnait pas ce que tu as écrit !
²Dim EBI <== IDEM
EBI=(i*EBII)/n
Je te conseil vivement d'aller dans la partie Tutoriels du site et de rechercher des tutoriaux pour débutant.