Eljárások és függvények

Az eljárások és a függvények a programstruktúra fő alapelemei. Segítségükkel egy összetett probléma több alfeladatra osztható.

Eljárások

Az eljárás végrehajt egy műveletet anélkül, hogy visszaadna értéket. A szintaxisa a következő:

Sub Teszt



   ' ... ezt itt az eljárás tényeges kódja



End Sub

Ez a példa definiál egy Teszt nevű eljárást, amely tartalmaz egy kódot, amely a program bármely pontjáról elérhető. Az eljárás meghívásához az eljárás nevét kell beszúrni a program adott pontján:

Teszt

Függvények

A függvény, akárcsak az eljárás, programrészleteket foglal össze egy egységbe. Viszont az eljárással ellentétben, a függvény visszaad egy értéket.

Function Teszt



   ' ... ez itt a függvény tényeges kódja



   Teszt = 123

End Function 

A visszatérési érték egyszerű értékadással megadható. Az értékadásnak nem kell a függvény végén lennie, bárhol elhelyezhető a függvényen belül.

Az előző függvény a következőképpen hívható meg a programból:

Dim A



A = Teszt

Ez a kód definiálja az A változót, majd hozzárendeli a Teszt függvény visszatérési értékét.

A visszatérési érték többször is felülírható a függvényben. Ahogy a klasszikus értékadásnál is, a példában a függvény is azt az értéket adja vissza, amelyet utoljára hozzárendeltek.

Function Teszt



   Teszt = 12



   ' ... 



   Teszt = 123



End Function 

Ebben a példában a függvény visszatérési értéke 123.

Ha egy értékadás leáll, a függvény a nulla értéket adja vissza (a 0-s számot numerikus értékeknél és üres értéket karakterláncoknál).

A függvény visszatérési értéke bármilyen típusú lehet. A típust ugyanúgy kell deklarálni, mint a változókat:

Function Teszt As Integer



   ' ... ez itt a függvény tényeges kódja



End Function 

Ha egy adott érték specifikálása leáll, akkor a visszatérési érték típusa variant lesz.

Eljárások és függvények megszakítása

A StarOffice Basic programban az Exit Sub és az Exit Function paranccsal lehet félbeszakítani egy eljárás vagy függvény végrehajtását annak befejezése előtt, például hibakeresési célból. Ezek a parancsok megállítják az eljárást vagy függvényt, és a program futása visszatér oda, ahonnan az eljárást vagy függvényt meghívták.

A következő példa bemutat egy eljárást, amely megszakad, ha a HibaTortent változó értéke True (igaz).

Sub Teszt

   Dim HibaTortent As Boolean



   ' ...



   If HibaTortent Then

      Exit Sub

   End If



   ' ...



End Sub

Paraméterek átadása

A függvényeknek és eljárásoknak átadható egy vagy több paraméter. A paramétereket zárójelbe kell tenni a függvény vagy eljárás neve után. A

Sub Teszt (A As Integer, B As String)

End Sub

példa definiál egy eljárást, amely egy A egész számot és egy B karakterláncot vár paraméterként.

A StarOffice Basic programban a paraméterek általában hivatkozásként kerülnek átadásra. A változókon végzett módosítás megmarad, amikor az eljárás vagy függvény kilép:

Sub Teszt

   Dim A As Integer

   A = 10

   ErtekModositasa(A)

   ' Az A paraméter értéke most 20

End Sub

Sub ErtekModositasa(AzErtek As Integer)

    AzErtek = 20

End Sub