Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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.