"if" non détecté

Résolu/Fermé

maxoodu757 Messages postés 36 Date d'inscription jeudi 26 décembre 2013 Statut Membre Dernière intervention 27 septembre 2015 - 20 févr. 2014 à 20:00
maxoodu757 Messages postés 36 Date d'inscription jeudi 26 décembre 2013 Statut Membre Dernière intervention 27 septembre 2015 - 20 févr. 2014 à 20:35

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

A voir également:

2 réponses

Réponse 1 / 2

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
20 févr. 2014 à 20:08

Bonjour,

C'est simple, le retour d'un input est une chaine de caractères et dans le if tu le compare à un entier !!!

Réponse 2 / 2

maxoodu757 Messages postés 36 Date d'inscription jeudi 26 décembre 2013 Statut Membre Dernière intervention 27 septembre 2015
20 févr. 2014 à 20:35

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 !"))

Discussions similaires

Livebox 4 Réseau Orange non détecté

Livebox s'allume mais marque pas de réseau orange

"AMD a détecté un dépassement de délai du pilote"

Mon iPhone ne charge plus mais détecte le chargeur

Magibook non detecté : je n'arrive pas à télécharger explora park