Bedingung und Alternative (If…Else…End If)

If-Konstrukt zur Verzweigung in zwei unterschiedliche Code-Blöcke.

 

If Parameter1 = 10 Then

   TuWas := 10

Else

   TuWas := 100

End If

Die Variable TuWas erhält den Wert 10, wenn Parameter1 den Wert 10 besitzt, ansonsten den Wert 100

Bei den häufig vorkommenden Entweder/Oder-Entscheidungen (z.B. in Ausdrücken von Formularen oder Steuerelementen) kann auch das Inline-If (IIf) eingesetzt werden.

 

Dim Result As Long

Result := IIf(Test = True, 10, 20)

Der erste Parameter ist die Bedingung, welche auf Wahrheit geprüft werden soll. Der zweite Parameter ist der Rückgabewert der Funktion bei Wahrheit, der dritte Parameter der Rückgabewert bei Unwahrheit.