IBM Lotus Symphony


GoSub...Return-lause [käytönaikainen]

Kutsuu toiminnosta tai funktiosta otsikon osoittaman toiminnon. Otsikkoa seuraavat lauseet suoritetaan seuraavaan Return-lauseeseen saakka. Sen jälkeen ohjelma jatkaa GoSub-lausetta seuraavan lauseen suorittamista.

Syntaksi:

katso Parametrit

Parametrit:

Sub/Function

lauselohko

Nimiö

lauselohko

GoSub Label

Exit Sub/Function

Label:

lauselohko

Return

End Sub/Function

GoSub-lause kutsuu toiminnosta tai funktiosta otsikon osoittaman paikallisen toiminnon. Otsikon nimen on päätyttävä kaksoispisteeseen (":").

Varoituskuvake Jos ohjelma kohtaa Return-lauseen, jota ei edellä GoSub-lause, Lotus Symphony Basic palauttaa virhesanoman. Exit Sub- tai Exit Function -lauseen avulla voit varmistaa, että ohjelma jättää toiminnon tai funktion, ennen kuin kohtaa seuraavan Return-lauseen.

Seuraava esimerkki esittelee GoSub- ja Return-lauseen käyttöä. Suorittamalla ohjelmaosan kahdesti ohjelma laskee kahden käyttäjän kirjoittaman luvun neliöjuuren.

Esimerkki:

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


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit