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.