If...Then...Else
Description
Exécute d'autres blocs du code du programme en fonction d'une ou plusieurs expressions.
Syntaxe A
If condition Then instruction_then [ Else instruction_else ]
Syntaxe B
If condition Then
bloc-instructions
[ ElseIf expression Then
bloc_instructions]...
[ Else
bloc_instructions]
End If
où : | représente : |
condition | Une expression qui aboutit à TRUE (non nul) ou FALSE (zéro). |
alors_instruction | Une expression unique, valide. |
autre_instruction | Une expression unique, valide. |
expression | Une expression qui aboutit à TRUE (non nul) ou FALSE (zéro). |
bloc-instructions | 0 ou plus expression valides, séparées par deux points (:), ou placées sur des lignes différentes. |
Commentaires
Quand plusieurs instructions sont requises dans les clauses Then ou Else, utilisez la version bloc (syntaxe B) de l'instruction If.
Exemple
Cet exemple vérifie l’heure et la date et renvoie le message correspondant.
Sub main
Dim h, m, m2, w
h = hour(now)
If h > 18 then
m= "Good evening, "
Elseif h >12 then
m= "Good afternoon, "
Else
m= "Good morning, "
End If
w = weekday(now)
If w = 1 or w = 7 then m2 = "the office is closed."_
else m2 = "please hold for company operator."
Msgbox m & m2
End Sub
Voir aussi
