| Menu: Progrfacile Accueil Premiers programmes Invite de commandes Syntaxe Tests conditionels Boucles Proc�dures et fonctions WSH et les objets Bases de donn�es D�boguer Livre d'or |
| Tests conditionels ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- |
| Les tests conditionnels serve � faire des chois et gr�ce � ces chois on ex�cutera tel ou tel choses. On a plusieurs fa�ons d�en faire un.
If Then Else If = si Then = alors Else = sinon Elseif = sinon si If condition then cons�quence Elseif condition then cons�quence Else cons�quence End if Ce bloc d�instruction est tr�s utile il permet de faire un chois, il est tr�s simple de l�utiliser, il faut simplement commencer par if et finir par end if au minimum. Dim nombre nombre = inputbox (� Saisissez un nombre �) If nombre mod 2 = 0 then Msgbox � Ce nombre est pair. � Else Msgbox � Ce nombre est impair. � End if Gr�ce � ce blocs d�instruction nous pouvons am�liorer le programme de tout a l�heure : dim nom nom = inputbox ("Saisissez votre nom","Nom") If msgbox ("Salut " & cstr(nom) & "," & vbcrlf & "Tu vas bien?", vbyesno + vbquestion) = Vbyes then Msgbox � Super moi aussi � Else MsgBox � Bon tant pis�. � End if On peut aussi mettre une autre condition dans une condition : Dim nombre nombre = inputbox (� Saisissez un nombre de 1 � 9�) If nombre mod 2 = 0 then Msgbox � Ce nombre est pair. � If nombre = 2 then Msgbox � ce nombre est premier � End if Else Msgbox � Ce nombre est impair. � If nombre = 3 then Msgbox � C�est un nombre premier � Elseif nombre = 5 then Msgbox � C�est un nombre premier � Elseif nombre = 7 then Msgbox � C�est un nombre premier � Else Msgbox � Ce n�est pas un nombre premier � End if End if page suivante |
 |
| Info sur moi: adresse: [email protected] |
| Visiteurs: |
|