Método de declaração

Suspende condicionalmente a execução quando booleanexpression retorna False na linha em que o método aparece.

Sintaxe

objeto de teste. Assertbooleanexpression

A sintaxe do método Assert tem o seguinte qualificador de objeto e argumento:

Sair Descrição
objeto Obrigatório. Sempre o objeto Debug .
BooleanExpression Obrigatório. Uma expressão avaliada como Verdadeiro ou Falso.

Comentários

As invocações de declaração funcionam somente no ambiente de desenvolvimento. Quando o módulo é compilado em um executável, as chamadas de método no objeto Debug são omitidas.

Toda a booleanexpression é sempre avaliada. Por exemplo, mesmo que a primeira parte de uma expressão And seja avaliada como False, a expressão inteira será avaliada.

Exemplo

O exemplo a seguir mostra como usar o método Assert . O exemplo requer um formulário com dois controles de botão. Os nomes de botão padrão são Command1 e Command2.

Quando o exemplo é executado, clicar no botão Command1 alterna o texto no botão entre 0 e 1. Clicar em Command2 não faz nada ou causa uma asserção, dependendo do valor exibido em Command1. A asserção interrompe a execução com a última instrução executada, a linha Debug.Assert, realçada.

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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.