Compartir a través de


Método Assert

Suspende condicionalmente la ejecución cuando booleanexpression devuelve False en la línea en la que aparece el método.

Sintaxis

objeto . Aserciónde booleanexpression

La sintaxis del método Assert tiene el siguiente argumento y calificador de objetos:

Parte Descripción
object Obligatorio. Siempre es el objeto Debug .
booleanexpression Obligatorio. Una expresión que se evalúa como True o False.

Comentarios

Las invocaciones Assert funcionan solo en el entorno de desarrollo. Cuando el módulo se compila en un ejecutable, se omiten las llamadas del método del objeto Debug.

Se evalúa siempre toda la expresión booleana. Por ejemplo, a pesar de que la primera parte de una expresión And se evalúe como False, se evaluará toda la expresión.

Ejemplo

En el siguiente ejemplo se muestra cómo usar el método Assert. El ejemplo requiere un formulario con dos controles de botón en él. Los nombres de botón predeterminados son Command1 y Command2.

Cuando se ejecuta el ejemplo, al hacer clic en el botón Comando1 se alterna el texto del botón entre 0 y 1. Al hacer clic en Comando2 , no hace nada o provoca una aserción, en función del valor mostrado en Command1. La aserción detiene la ejecución con la última instrucción ejecutada, la línea Debug.Assert, resaltada.

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

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.