Comptabiliser des bonnes réponses sur un programme en .vbs
Résolu
gp59
Messages postés
12
Statut
Membre
-
gp59 Messages postés 12 Statut Membre -
gp59 Messages postés 12 Statut Membre -
Bonjour, je crée un programme qui me permettra de réviser mes verbes irréguliers en .vbs. J'aimerais savoir s'il est possible de faire la comptabilisation pour savoir le nombre de bonnes réponses. Je bloque seulement dessus, toutes les autre instruction, je les connaît! Merci d'avance
1 réponse
-
Bonjour,
Disons que la demande est très vague.
Fait une variable Points, Reponse et BonneReponse
Reponse sera la réponse que tu compare avec la bonne réponse.
On initialise points a zero, et on l'incrémente quand la reponse est bonne.
Points = 0
Boucle sur toute les réponse
Reponse = Aller chercher ici ce qui a été écrit.
BonneReponse = Aller cherche la bonne reponse
si Reponse = BonneReponse
Points = Point + 1
prochaine reponse
Aucune idée comment tu inscrit tes réponses. inputbox textbox ?,
et ou sont inscris les bonnes réponses pour comparer?
Tu sembles avoir déjà commencer ton programme, alors a toi de nous en dire plus.-
J'ai essayé d'inscrire les réponses avec inputbox, mais celui ci indique " dépassement de capacité", donc je vais essayer avec textbox.
Je vais citer le début du code:MsgBox " Welcome to the test of irregular verbs" ( je présente le programme )
Dim msg
msg=InputBox (msg, "Etre")
If msg=be was were been Then -
Re-Bonjour
be et BE n'est pas identique.
Aussi, du texte doit être mis entre guillemet.
Voici un debut
Dim msg as string Dim Point as integer 'Initialiser la variable point Point = 0 'Texte de présentation MsgBox " Welcome to the test of irregular verbs" 'Première question msg=InputBox (msg, "Etre") 'Evalue si la réponse est bonne If msg= "be" or msg= "was" or msg= "were" or msg= "been" Then 'si oui Point = Point + 1 msgbox "Réussi, vous avez " & Point & " points" Else 'Si non msgbox "Erreur, les réponses possible était be, was, were, been" End if 'Prochaine question..... -
-
Peux-tu recopier l'intégralité de ton code ici.
Il sera plus facile de trouver ce qui cloche.
Edit :
Ah, je viens de lire sur les différence entre VBS et VBA.
Il semble que toutes les variables sont de type variant en VBS.
Donc, enlever les types de variable dans mon exemple précédent.
Dim msg Dim Point
-
-
