a = msgbox("aime tu les carottes?", vbyesno, "gouts" )
if (a = yes) then
b = msgbox("c'est cool, si tu veux revenir clique sur réessayer", vbretry, "gouts" )
if (b = retry) then ?????????????????????????
qu'est-ce que je dois mettre pour revenir à la première question (a)
(d'accord la question est naze mais c'est pour l'exemple)
Message édité par psymon stark le 12-05-2006 à 20:46:10
Publicité
Posté le 11-05-2006 à 20:51:22
Epena
Posté le 11-05-2006 à 22:21:30
En appelant une étiquette
Début:
a = msgbox("aimes-tu les carottes?", vbyesno, "gouts" )
if (a = vbyes) then b = msgbox("c'est cool, si tu veux revenir clique sur réessayer", vbretry, "gouts" ) If (b = vbretry) then goto Début
End if
end if
Cordialement
Epena
galopin01
Posté le 12-05-2006 à 07:44:21
bonjour,
il vaut mieux éviter les goto...
préfère des structures de ce genre :
Code :
Dim Y as boolean
Do while not Y
a = msgbox("aimes-tu les carottes?", vbyesno, "gouts" )
if (a = vbyes) then
b = msgbox("c'est cool, si tu veux revenir clique sur réessayer", vbretry, "gouts" )
Else
Y = True
End if
Loop
A+
Message édité par galopin01 le 12-05-2006 à 07:44:52
psymon stark
smash
Posté le 12-05-2006 à 18:08:41
merci de vos réponses mais avec epena il ne reconnait pas goto et avec avec galopin01 il ne reconait pas le as,
au cas je vous dit que je sauvegarde en .vbs, pitit help please...
psymon stark
smash
Posté le 12-05-2006 à 18:10:30
ah oui et il ne reconnait pas les "é" mais même en changeant ca march pas, cé à cause de ca?
psymon stark
smash
Posté le 12-05-2006 à 19:24:29
mais ca marche sans le "Dim Y as boolean"
psymon stark
smash
Posté le 12-05-2006 à 20:07:53
et............ si je veux faire plusieurs boucles.......?
psymon stark
smash
Posté le 12-05-2006 à 20:45:33
nan laissez tomber j'ai tout piger, je me suis défoncer à trouver mais j'ai réussiiiiiiiiiiiiiiiiiiiii!!!!! purée j'ai des élans de confiance en moi,