LibreOffice 7.3 žinynas
Aprašo paprogramę, kuri gali būti naudojama kaip reiškinys grąžinimo tipui nustatyti.
Sub, Function arba Property sakiniai yra niekuo neišsiskiriantys panašūs metodai. Jie gauna parametrus naudojant nuorodą ir galima juos keisti. „% PRODUCTNAME Basic“ kompiliatorius numato, kad jų atitinkama argumentų sintaksė būtų keičiama.
[Private | Public] Function Name[char] (argument1 [As Type][, argument2[char][,...]]) [As typename]
sakiniai
[Exit Function]
sakiniai
End Function
taikymo sritis: Funkcijos numatytoji taikymo sritis yra Vieša. Taikymo sritis Privati žymi modulio vidinę paprogramą, kuri nėra skirta naudoti iš kitų modulių.
vardas: Paprogramės pavadinimas, kuriame nurodoma funkcijos grąžinta reikšmė.
argumentai: Parametrai, kuriuos reikia perduoti paprogramei.
Sub ExampleExit
Dim sReturn As String
Dim sListArray(10) As String
Dim siStep As Single
siStep = 0 To 10 ' Užpildykite masyvą testo duomenimis
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
' Eilutės paieška kaip tekstinis masyvas:sList() tekstinis įrašas:
' Grąžinama reikšmė Ar indekso reikšmė arba 0 (nulis)
For iCount=1 To Ubound( sList() )
If sList( iCount ) = sItem Then
Išėjimas ' sItem rastas
End If
Next iCount
If iCount = Ubound( sList() ) Then iCount = 0
LinSearch = iCount
End Function