Метод Assert

  • Статья

Условно приостанавливает выполнение, когда booleanexpression возвращает значение False в строке, в которой отображается метод .

Синтаксис

object. Утверждениелогического выражения

Синтаксис метода Assert содержит такие описатель объекта и аргумент:

Part Описание
object Обязательно. Всегда объект Debug .
booleanexpression Обязательно. Выражение, вычисляющее значение логического выражения как True или False.

Замечания

Assert вызывается только в среде разработки. Когда модуль компилируется для исполнения, вызов метода объекта Debug не происходит.

Все логические выражения booleanexpression вычисляются. Например, даже если первой части выражения And присваивается значение False, вычисляется все выражение.

Пример

Рассмотрим, как использовать метод Assert. Для примера берется форма с двумя кнопками. По умолчанию используются имена кнопок Command1 и Command2.

При выполнении примера при нажатии кнопки Command1 текст на кнопке переключается между 0 и 1. Щелчок Command2 либо ничего не делает, либо вызывает утверждение в зависимости от значения, отображаемого в Command1. Утверждение останавливает выполнение с выделенной строкой Debug.Assert последней выполненной инструкцией.

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

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.