Choix multiple vbs

Bonjour,
tout est dans le titre
je voudrai faire une question auquelle les autres personne peuvent repondre .
ex:bonjour est ce que sa va ( choix possible oui/non)
de facon a ce que si la personne clique sur oui il y ai un texte qui s'affiche
et que si elle clique sur non il y ai un autres texte qui s'affiche.
je sais qu'il y a un truc a faire avec if
Configuration: Windows Vista Internet Explorer 8.0

4 réponses

  1. Si il faut que tu fasse une Msgbox :
    'Msgbox ("Messge affiché", type oui/non, "Titre de la box
    rep = Msgbox ("Salut est-ce que ça va ?", vbYesNo, "Bienvenue") 
    If (rep = vbYes) then
    Msgbox "Ah ba tant mieux"
    else
    Msgbox "Ah bon, ba pourquoi ça va pas ?"
    end If
    


    Voila pas plus compliqué
    1. Pour pouvoir le réaffiché il faut que tu construire un String ("chaine de caractères" en anglais).
      Pour ce utiliser la fontion vbs : CStr(expression) *. Cette fonction permet de passer d'une expression à une chaine.
      En somme pour réafficher le texte rentré par l'utilisateur il faut ce code :
      Dim rep, aff
      rep = InputBox ("entre qq chose" , "qq chose" , "") 
      aff = CStr(rep)
      MsgBox aff 
      


      J'espère t'avoir été utile :-)
      1. oui j'ai essayé cela donne un bon rendu mais j'ai chercher sur le web et je n'ai pas trouvé la reponse a mon autre question :
        comment faire pour que l'utilisateur rentre un texte et qu'il le resorte aprés

        voila le code que j'ai essayé :
        rep = InputBox ("entre qq chose" , "qq chose" , "")
        MsgBox "%rep"

        mais voila cela ne marche pas pourriez vous m'eclaircir s'il vous plait

        merci