LibreOffice 25.2 abi
Exits a Do...Loop, For...Next, a function, a property, or a subroutine.
Exit Do, Exit For, Exit Function, Exit Property, Exit Sub
Exit Do
Kehtib ainult lauses Do...Loop tsükli sulgemiseks. Programmi käitamine jätkub tsükli lausele jätkuva lausega. Kui laused Do...Loop on pesestatud, viiakse juhtelement järgmise taseme tsüklisse.
Exit For
Kehtib ainult lauses For...Next tsükli sulgemiseks. Programmi käitamine jätkub tsükli lausele jätkuva lausega. Kui laused For...Next on pesestatud, viiakse juhtelement järgmise taseme tsüklisse.
Exit Function
Suleb kohe protseduuri Function. Programmi käitamine jätkub kutsele Function järgneva lausega.
Exit Property
Exits the Property procedure immediately. Program execution continues with the statement that follows the Property call.
Exit Sub
Suleb kohe alaprogrammi. Programmi käitamine jätkub kutsele Sub järgneva lausega.
Lause Exit ei määratle struktuuri lõppu ja seda ei tohi segamini ajada lausega End.
Sub ExampleExit
Dim sReturn As String
Dim sListArray(10) As String
Dim siStep As Single
For siStep = 0 to 10 REM Täidab massiivi testandmetega
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
REM LinSearch otsib TextArray:sList() seest TextEntry:
REM tagastab kirje indeksi või 0 (Null)
For iCount=1 To Ubound( sList() )
If sList( iCount ) = sItem Then
Exit for REM leiti sItem
End If
Next iCount
If iCount = Ubound( sList() ) Then iCount = 0
LinSearch = iCount
End Function