Exit Statement

Paglabas a Gawin...Loop , Para sa...Susunod , isang function, isang property, o isang subroutine.

Exit Do, Exit For, Exit Function, Exit Property, Exit Sub

Exit Do

May bisa lamang sa loob ng a Gawin...Loop pahayag upang lumabas sa loop. Ang pagpapatupad ng programa ay nagpapatuloy sa pahayag na sumusunod sa pahayag ng Loop. Kung Gawin...Loop ang mga pahayag ay naka-nest, ang kontrol ay inililipat sa loop sa susunod na mas mataas na antas.

Exit For

May bisa lamang sa loob ng a Para sa...Susunod loop upang lumabas sa loop. Ang pagpapatupad ng programa ay nagpapatuloy sa unang pahayag na kasunod ng Susunod pahayag. Sa mga nested na pahayag, inililipat ang kontrol sa loop sa susunod na mas mataas na antas.

Exit Function

Lumabas sa Function pamamaraan kaagad. Ang pagpapatupad ng programa ay nagpapatuloy sa pahayag na sumusunod sa Function tawag.

Exit Property

Lumabas sa Ari-arian pamamaraan kaagad. Ang pagpapatupad ng programa ay nagpapatuloy sa pahayag na sumusunod sa Ari-arian tawag.

Exit Sub

Agad na lumabas sa subroutine. Ang pagpapatupad ng programa ay nagpapatuloy sa pahayag na sumusunod sa Sub tawag.

Ang Exit statement ay hindi tumutukoy sa dulo ng isang istraktura, at hindi dapat malito sa End statement.

Sub ExampleExit
Dim sReturn As String
Dim sListArray(10) As String
Dim siStep As Single
    Para sa siStep = 0 Hanggang 10 ' Punan ang hanay ng data ng pagsubok
        sListArray(siStep) = chr(siStep + 65)
        MsgBox sListArray(siStep)
    Next siStep
    sReturn = LinSearch(sListArray(), "B")
    Print sReturn
End Sub
 
Function LinSearch( sList(), sItem As String ) As Integer
Dim iCount As Integer
' Hinahanap ng LinSearch ang isang TextArray:sList() para sa isang TextEntry:
' Ibinabalik ang index ng entry o 0 (Null)
    For iCount=1 To Ubound( sList() )
        If sList( iCount ) = sItem Then
            Lumabas Para sa ' sItem na natagpuan
        End If
    Next iCount
    If iCount = Ubound( sList() ) Then iCount = 0
    LinSearch = iCount
End Function