Exit
Exits a loop or procedure.
Syntax
Exit {Do | For | Function | Sub}
Example
' This sample shows Do ... Loop with Exit Do to get out.
Dim Value, Msg ' Declare variables
Do
Value = InputBox("Enter a value from 5 to 10.")
If Value >= 5 And Value <= 10 Then ' Check range
Exit Do ' Exit Do...Loop
Else
Beep ' Beep if not in range
End If
Loop