Contents

# Exit Statement

Exits a Do...Loop, For...Next, a function, a property, or a subroutine.

### Syntax:

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

### Parameters:

Exit Do

འབད་...འཕྲལ་བཀོལ་ གསལ་བཤད་ནང་འཁོད་ འཕྲལ་བཀོལ་ཕྱིར་ཐོན་ལུ་རྐྱངམ་ཅིག་ནུས་ཅན་ཨིན། ལས་རིམ་ལག་ལེན་འཐབ་ནི་དེ་གསལ་བཤད་ འཕྲལ་བཀོལ་གསལ་བཤད་ཀྱི་རྗེས་སུ་གྲངས་མི་དང་གཅིག་ཁར་འཕྲོ་མཐུདཔ་ཨིན། འབད་...འཕྲལ་བཀོལ་ གསལ་བཤད་ཚུ་ ནེསིཊིཌ་ཨིན་པ་ཅིན་ཚད་འཛིན་དེ་ཤུལ་མ་གནས་རིམ་མཐོ་མི་་འཕྲལ་བཀོལ་ནང་གནས་སོར་གཏང་ཡོདཔ་ཨིན།

Exit For

དོན་ལུ་...ཤུལ་མ་ འཕྲལ་བཀོལ་ནང་འཁོད་འཕྲལ་བཀོལ་ཕྱིར་ཐོན་ལུ་རྐྱངམ་ཅིག་ནུས་ཅན་ཨིན། ལས་རིམ་ལག་ལེན་འཐབ་ནི་དེ་གསལ་བཤད་དང་པ་ ཤུལ་མ་ གསལ་བཤད་རྗེས་སུ་གྲངས་མི་དང་གཅིག་ཁར་འཕྲོ་མཐུདཔ་ཨིན། ནེསིཊིཌ་གསལ་བཤད་ཚུ་ནང་ ཚད་འཛིན་དེ་ཤུལ་མ་གནས་རིམ་མཐོ་མི་ནང་འཕྲལ་བཀོལ་ལུ་གནས་སོར་གཏང་ཡོདཔ་ཨིན།

Exit Function

ལས་འགན་ བྱ་སྒོའི་ལམ་ལུགས་ དེ་འཕྲལ་ལས་ཕྱིར་བཏོན་གཏངམ་ཨིན། ལས་རིམ་ལག་ལེན་འཐབ་ནི་དེ་གསལ་བཤད་ ལས་འགན་ བོད་བརྡ་རྗེས་སུ་གྲངས་མི་དེ་འཕྲོ་མཐུདཔ་ཨིན།

Exit Property

Exits the Property procedure immediately. Program execution continues with the statement that follows the Property call.

Exit Sub

རྒྱུན་ལས་དེ་འཕྲོ་ལས་ཕྱིར་ཐོན་འབདཝ་ཨིན། ལས་རིམ་ལག་ལེན་འཐབ་ནི་འཕྲོ་མཐུད་ནི་གཅིག་ཁར་གསལ་བཤད་དེ་ འོག་མ་ བོད་བརྡ་རྗེས་སུ་གྲངསམ་ཨིན།

ཕྱིར་ཐོན་གསལ་བཤད་དེ་གིས་གཞི་བཀོད་ཀྱི་མཇུག་དེ་ངེས་འཛིན་མི་འབདཝ་དང་ མཇུག་གསལ་བཤད་གཅིག་ཁར་་མགུ་འཐོམ་ནི་མེད་འོང་།

### Example:

    Sub ExampleExit
    Dim sReturn As String
    Dim sListArray(10) As String
    Dim siStep As Single
        ཨེསི་ཨའི་རིམ་པ་དོན་ལུ་  = ༠ ལས་ ༡༠ ལུ་རིམ་གྱིས་ཨེ་རེ་གཅིག་ཁར་བརྟག་ཞིབ་གནད་སྡུད་བཀང་།
            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
    ཨར་ཨི་ཨེམ་ལིན་ཞིབ་འཚོལ་གྱིས་ཚིག་ཡིག་ཨེ་རེ་:ཨེསི་ཐོ་ཡིག་()ཚིག་ཡིག་ཐོ་བཀོད་དོན་ལུ་ཞིབ་འཚོལ་འབདཝ་ཨིན:
    ཨར་ཨི་ཨེམ་ཐོ་བཀོད་ཡང་ན་༠ (སྟོང་ཆ་)གི་ཟུར་ཐོ་དེ་སླར་ལོགཔ་ཨིན།
        For iCount=1 To Ubound( sList() )
            If sList( iCount ) = sItem Then
                ཨར་ཨི་ཨེམ་ཨེསི་རྣམ་གྲངས་འཚོལ་ཐོབ་དོན་ལུ་ཕྱིར་ཐོན།
            End If
        Next iCount
        If iCount = Ubound( sList() ) Then iCount = 0
        LinSearch = iCount
    End Function

Please support us!