LibreOffice 7.1 Hjælp
Angiver en subrutine der kan bruges som et udtryk til at fastslå en returneringstype.
Erklæringerne Sub, Function eller Property er ensartede metoder uden nogen skelnen. De modtager parametre ved reference, der lader til gengælg lader dem blive ændret. LibreOffice Basic-fortolkeren accepterer, at deres respektive argumentsyntaks bruges i flæng.
[Private | Public] Function Name[char] (argument1 [As Type][, argument2[char][,...]]) [As typename]
udtryk
[Exit Function]
udtryk
End Function
scope: Funktioners standardrækkevidde er Public. En Private rækkevidde betegner en modul-intern rutine, der ikke er tænkt anvendt fra andre moduler.
name: Navnet på den subrutine, der skal indeholde den værdi, der returneres af funktionen.
arguments: Parametre, der skal overføres til subrutinen.
Sub ExampleExit
Dim sReturn As String
Dim sListArray(10) As String
Dim siStep As Single
For siStep = 0 to 10 ' Fyld array med testdata
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
' Linsearch søger en TextArray:sList() efter en TextEntry:
' Returværdi er elementets indeks eller 0 (Null)
For iCount=1 To Ubound( sList() )
If sList( iCount ) = sItem Then
Exit for ' sItem fundet
End If
Next iCount
If iCount = Ubound( sList() ) Then iCount = 0
LinSearch = iCount
End Function