"if" non détecté

Résolu
maxoodu757 Messages postés 36 Date d'inscription   Statut Membre Dernière intervention   -  
maxoodu757 Messages postés 36 Date d'inscription   Statut Membre Dernière intervention   -
Bonsoir, je voulais savoir pourquoi mon programme ne fonctionne pas :

msgbox"Quel est ton niveau ?"
msgbox"Entre ton niveau dans la fenêtre qui va suivre (entre 0 et le nombre que tu veux) !"

niveau = inputbox ("Estime ton niveau !")
pages = niveau
ferme = 0
msgbox"Tu t'es fait avoir ! Ce programme est un piège !"

do
msgbox "Le niveau à atteindre est de "& niveau &" !"_
+ chr(13) _
+ chr(13) _
+ "Il de reste donc "& pages &" fenêtres à fermer !"_
+ chr(13) _
+ chr(13) _
+ "Tu as déjà fermé "& ferme &" fenêtres !"

if (ferme = niveau) then
msgbox "GAGNÉ !"
Wscript.quit
else
end if


pages = pages - 1
ferme = ferme + 1

loop

2 réponses

Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

C'est simple, le retour d'un input est une chaine de caractères et dans le if tu le compare à un entier !!!
2
maxoodu757 Messages postés 36 Date d'inscription   Statut Membre Dernière intervention  
 
Ha oui !!!! Merci beaucoup ! Je ne m'était pas rendu compte :)

Du coup j'ai réglé mon problème en modifiant le input comme ceci :
niveau = cint(inputbox ("Estime ton niveau !"))
0