Visual Basic: AndOr und OrElse

Lies diesen Artikel und viele weitere mit einem kostenlosen, einwöchigen Testzugang.

Es gibt oft verschachtelte Bedingungen unter VB. Wer mit VBA programmiert hat, kennt den einzigen Weg, dies zu implementieren: indem man zwei oder mehr If…Then-Bedingungen verschachtelt. Unter Visual Basic nutzen Sie dazu die AndAlso-Verkettung. Und auch bei Ausdrücken mit Oder können Sie mit einem neuen Schlüsselwort die Performance verbessern.

Wenn Sie unter VBA eine Aktion nur durchführen wollen, wenn zwei Bedingungen wahr sind, dann gelingt das am einfachsten mit der folgenden Schreibweise:

If Bedingung1 = True And Bedingung2 = True Then
     'Aktion ausführen
End If

Zunächst einmal lässt sich dies noch vereinfachen, denn es reicht, die Bedingungen anzugeben – diese werden ja schon auf den Wert True geprüft:

If Bedingung1 And Bedingung2 Then
     'Aktion ausführen
End If

Nur, wenn Sie prüfen wollen, ob der Ausdruck Bedingung1 oder Bedingung2 falsch ist, müssen Sie zum Beispiel Bedingung 1 = False angeben. Manchmal kommen Sie mit dieser Schreibweise jedoch nicht weiter – zum Beispiel, wenn Bedingung2 nur auswertbar ist, wenn Bedingung1 wahr ist. Wenn Sie also in der ersten Bedingung testen, ob ein bestimmtes XML-Element vorhanden ist und in der zweiten dann prüfen, ob der Wert des XML-Elements einen bestimmten Wert hat, funktionierte das nur fehlerfrei, wenn die erste Bedingung erfüllt ist. Ist das nicht der Fall, ist XML-Element nicht vorhanden und die zweite Bedingung löst beim Zugriff auf das XML-Element einen Fehler aus. In diesem Fall verwenden wir zwei verschachtelte If…Then-Bedingungen:

If Bedingung1 = True Then
     If Bedingung2 = True Then
    'Aktion ausführen
     End If
End If

Unter VB können Sie dies viel einfacher formulieren. Dazu nutzen wir das Schlüsselwort AndAlso:

If Bedingung1 = True AndAlso Bedingung2 = True Then
     'Aktion ausführen
End If