Instrucción Exit

Sale de un bloque de código Do...Loop, For...Next, Function o Sub.

Exit Do
Exit For
Exit Function
Exit Property
Exit Sub

La sintaxis de la instrucción Exit se compone de:

Instrucción	Descripción
Exit Do	Proporciona una forma de salir de una instrucción Do...Loop. Sólo se puede utilizar dentro de una instrucción Do...Loop. Exit Do transfiere el control a la instrucción que sigue a la instrucción Loop. Cuando se utiliza dentro de instrucciones Do...Loop anidadas, Exit Do transfiere el control al bucle que está anidado un nivel por encima del bucle donde se inicia.
Exit For	Proporciona una forma de salir de un bucle For. Sólo se puede utilizar en un bucle For...Next o For Each...Next. Exit For transfiere el control a la instrucción que sigue a la de Next. Cuando se utiliza dentro de bucles For anidados, Exit For transfiere el control al bucle que está anidado un nivel por encima del bucle donde se inicia.
Exit Function	Inmediatamente sale del procedimiento Function en el que aparece. La ejecución continúa con la instrucción que sigue a la que llamó a Function.
Exit Property	Inmediatamente sale del procedimiento Property en el que aparece. La ejecución continúa con la instrucción que sigue a la que llamó al procedimiento Property.
Exit Sub	Inmediatamente sale del procedimiento Sub en el que aparece. La ejecución continúa con la instrucción que sigue a la que llamó a Sub.

El siguiente ejemplo ilustra el uso de la instrucción Exit:

Sub RandomLoop
   Dim I, MiNum
   Do   ' Establece un bucle infinito.
      For I = 1 To 1000   ' Ejecuta el bucle 1000 veces.
         MiNum = Int(Rnd * 100)   ' Genera números aleatorios.
         Select Case MiNum   ' Evalúa un número aleatorio.
            Case 17: MsgBox "Case 17"
               Exit For   ' Si es 17, sale de For...Next.
            Case 29: MsgBox "Case 29"
               Exit Do   ' Si es 29, sale de Do...Loop.
            Case 54: MsgBox "Case 54"
               Exit Sub   ' Si es 54, sale del procedumiento.
            End Select
      Next
   Loop
End Sub

Requisitos

Versión 1

Consulte también

Instrucción Do...Loop | Instrucción For Each...Next | Instrucción For...Next | Instrucción Function | Instrucción Sub