J'ai un petit problème, je m'amuse a faire un petit jeu de loterie en vbs avec le bloc-note. Dès que j'enregistre et que je lance le programme pour tester et ça me dit que j'ai entrer la commande (do ... loop) sans le do, pourtant je l'ai bien mis
Je comprend pas pourquoi il me dise ça. Voila le code que j'ai raccourcis pour voir si c'est parce que do et loop sont trop éloignés mais sa ne marche toujours pas
:
'dim argentscore
dim choix
dim alea
argentscore = 200
msgbox("Début du test ! Let's go !!!!!!!")
do
msgbox("Appuie sur 'Ok' pour lancer la rouuuue !")
Randomize
alea = Int((2* Rnd) + 1)
If (alea = 1) then
argentscore = argentscore + 100
choix=inputbox("Bravo tu a trouvé la combinaison a 100 $ ! Pas mal, réessaye !"_
+ chr(13) _
+ "Votre argent : "& argentscore &" $.")
if (choix = "oui") then
argentscore = argentscore - 50
else
if (choix = "non") then
msgbox("D'accord, au revoir !")
Wscript.quit
If (alea = 2) then
choix=inputbox("Dommage tu a raté ! Réessaye !"_
+ chr(13) _
+ "Votre argent : "& argentscore &" $.")
loop
end if
end if
end if
end if
J'espere que vous m'aurez compris et merci d'avance pour les réponses 