Do Loop UntilRésolu

Question

encore moi 

                
                comment faire pour qu'il me donne la table de deux de 2 a 20 pcq la il me fait 4 8 12 



 EN BOUCLE DO LOOP UNTIL??  



Private Sub Calculer_Click()

Dim a, x, b

 a = 1

x = Ttable.Text

For a = 1 To 10

b = a * x

 treponse.Text = treponse.Text + Str(b) + " - "

 Next a








http://chtiloveur.skyblog.com

us_30 · Accepted Answer

Sinon,

Dim a, x, b
 a = 1
x = Ttable.Text
Do
b = a * x
a=a+1
 treponse.Text = treponse.Text + Str(b) + " - "
loop until a=10

Devrait marcher ! et si tu as du mal à dormir, ben... t'as plus qu'à compter les moutons, de deux en deux... :-);

Us.

us_30 · Answer

Bonsoir,

Contacter en message perso, puis 2 posts au forum... Tu rameute tout le monde... Tu vas finir par la connaître par coeur ta table des 2 ! OUI ! Puis au lit ! :-);

Amicalement,
Us.

cs_cricri_forever · Answer

d&#233;so pr les deux poste mais je croy&#233; qu'il n'avai pa fonctionn&#233; le premier 

http://chtiloveur.skyblog.com

us_30 · Answer

(Fô pas être désolé, je plaisante... ceci ==> :-); <== c'est une sourire complice...)

Amicalement,
Us.

PCPT · Answer

non seulement ils ont fonctionn&#233;, mais en plus ils ont r&#233;ponses...
PCPT

us_30 · Answer

HOulà ! PCPT... tu fatigues sec... je compati, j'vais coucher...

A la prochaine,
Amicalement,
Us.

Do Loop Until

6 réponses

Discussions similaires