Quizz simple

Question

Bonjour, Je suis en train d'essayer de créer un petit Quizz en VB sans interface, juste avec l'application console, qui poserai 10 questions à l'utilisateur et qui comptabiliserai les bonnes réponses à la fin. J'aimerai mettre une structure du type "Do while" tant que l'utilisateur ne répond à la question ni par A ni par B. Ci joint mon code ( qui ne marche pas ). Merci de m'aider parceque là j'en peu plus Module Module1 Sub Main() Dim i As Integer Dim réponseutilisateur As String Dim A As String Dim B As StringInputBox("Qui sera le gardien numéro 1 de l'équipe de France de Football ? A) Barthez B) Coupet ?") Do While réponseutilisateur <> "A" And réponseutilisateur <> "B"MsgBox("Retente") Loop If réponseutilisateur = "A" Theni = 0 + 5 If réponseutilisateur = "B" Theni = 0 End If End If MsgBox("Vous avez réussi en "i" fois") End Sub End Module

Renfield · Answer

inverse ta boucle... Do While ... Loop en Do ... Loop While Do réponseutilisateur = InputBox("Qui sera le gardien numéro 1 de l'équipe de France de Football ? A) Barthez B) Coupet ?") Loop While réponseutilisateur <> "A" And réponseutilisateur <> "B" après, a toi de voir pour intégrer ton message 'retente' ou autre.... au fait, là, tu n'utilises pas la console ^^ Renfield Admin CodeS-SourceS- MVP Visual Basic

Quizz simple

1 réponse

Votre réponse

Discussions similaires