Partilhar via


Método de declaração

Suspende condicionalmente a execução quando a booleanexpression devolve False na linha na qual o método é apresentado.

Sintaxe

objeto. Assertbooleanexpression

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

Sair Descrição
objeto Obrigatório. Sempre o objeto Depurar .
booleanexpression Obrigatório. Uma expressão que avalia como Verdadeiro ou Falso.

Comentários

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

Toda a booleanexpressão é sempre avaliada. Por exemplo, mesmo que a primeira parte de uma expressão And avalie Falso, toda a expressão é avaliada.

Exemplo

O exemplo seguinte mostra como utilizar o método Assert . O exemplo requer um formulário com dois controlos de botão. Os nomes dos botões predefinidos são Comando1 e Comando2.

Quando o exemplo é executado, clicar no botão Comando1 ativa o texto no botão entre 0 e 1. Clicar em Comando2 não faz nada ou causa uma asserção, dependendo do valor apresentado no Comando1. 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.