IBM Lotus Symphony


Stavek GoSub...Return [izvajalno okolje]

Pokliče podprogram, ki je označen z nalepko iz podprograma ali funkcije. Stavki, ki sledijo nalepki, se izvedejo do naslednjega stavka Return. Potem program nadaljuje s stavkom, ki sledi stavku GoSub.

Skladnja:

Glejte odsek Parametri

Parametri:

Sub/Function

blok stavka

Nalepka

blok stavka

GoSub Label

Exit Sub/Function

Label:

blok stavka

Return

End Sub/Function

Stavek GoSub kliče lokalni podprogram, ki ga označuje nalepka znotraj podprograma ali funkcije. Ime nalepke se mora končati z dvopičjem (":").

Ikona opozorila Če program naleti na stavek Return, pred katerim ni stavka GoSub, Lotus® Symphony™ Basic vrne sporočilo o napaki. Če želite zagotoviti, da program zapusti Sub ali Function, preden doseže naslednji stavek Return, uporabite funkciji Exit Sub ali Exit.

Naslednji primer prikazuje uporabo stavkov GoSub in Return. S tem, da dvakrat izvede del programa, program izračuna kvadratni koren dveh številk, ki jih je vnesel uporabnik.

Primer:

Sub ExampleGoSub

dim iInputa as Single

dim iInputb as Single

dim iInputc as Single

iInputa = Int(InputBox$ "Enter the first number: ","NumberInput"))

iInputb = Int(InputBox$ "Enter the second number: ","NumberInput"))

iInputc=iInputa

GoSub SquareRoot

Print "The square root of";iInputa;" is";iInputc

iInputc=iInputb

GoSub SquareRoot

Print "The square root of";iInputb;" is";iInputc

Exit Sub

SquareRoot:

iInputc=sqr(iInputc)

Return

End Sub


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke