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.