Assert-Methode

Hält die Ausführung bedingt an, wenn booleanexpression in der Zeile, in der die Methode angezeigt wird, False zurückgibt.

Syntax

-Objekt.Assertbooleanexpression

Die Syntax der Assert-Methode weist den folgenden Objektkennzeichner und das folgende Argument auf:

Teil Beschreibung
Objekt Erforderlich. Immer das Debug-Objekt .
Boolescher Ausdruck Erforderlich. Ein Ausdruck, der als True oder False ausgewertet wird.

HinwBemerkungeneise

Assert-Aufrufe funktionieren nur innerhalb der Entwicklungsumgebung. Wenn das Modul in eine ausführbare Datei kompiliert wird, werden Methodenaufrufe des Debug-Objekts nicht eingeschlossen.

Der gesamte Ausdruck booleanexpression wird immer ausgewertet. Wenn beispielsweise der erste Teil eines And-Ausdrucks bereits False ergibt, wird trotzdem der gesamte Ausdruck ausgewertet.

Beispiel

Mit dem folgenden Beispiel wird gezeigt, wie die Assert -Methode verwendet wird. Für das Beispiel ist ein Formular mit zwei Schaltflächen-Steuerelementen erforderlich. Die Standardnamen der Schaltflächen sind Command1 und Command2.

Wenn das Beispiel ausgeführt wird, wird durch Klicken auf die Schaltfläche Befehl1 der Text auf der Schaltfläche zwischen 0 und 1 umgeschaltet. Wenn Sie auf Befehl2 klicken, wird entweder nichts ausgeführt, oder es wird eine Assertion ausgelöst, je nachdem, welchen Wert in Command1 angezeigt wird. Die Assertion bricht die Ausführung ab, wobei die letzte ausgeführte Anweisung, die Zeile mit "Debug.Assert" hervorgehoben wird.

Option Explicit
Private blnAssert As Boolean
Private intNumber As Integer

Private Sub Command1_Click()
    blnAssert = Not blnAssert
    intNumber = IIf(intNumber <> 0, 0, 1)
    Command1.Caption = intNumber
End Sub

Private Sub Command2_Click()
    Debug.Assert blnAssert
End Sub

Private Sub Form_Load()
    Command1.Caption = intNumber
    Command2.Caption = "Assert Tester"
End Sub

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.