IBM Lotus Symphony
|
Fortsetter kjøring av programmet innenfor en sub (subrutine) eller funksjon ved prosedyrelinjen som er markert med en etikett.
Se Parametere
Sub/Funksjon
setningsblokk
GoTo Etikett1
Etikett2:
setningsblokk
Exit Sub
Etikett1:
setningsblokk
GoTo Etikett2
End Sub/Function
Bruk GoTo-setningen til å be IBM Lotus Symphony Basic fortsette programutførelsen et annet sted i prosedyren. Posisjonen må angis av en etikett. For å definere en etikett tildeler du et navn og avslutter med et kolon (":").
Advarsel: Du kan ikke bruke GoTo-setningen til å hoppe ut av en sub (subrutine) eller funksjon.
Sub ExampleOnGosub
Dim iVar As Integer
Dim sVar As String
iVar = 2
sVar =""
On iVar GoSub Sub1, Sub2
On iVar GoTo Line1, Line2
Exit Sub
Sub1:
sVar =sVar & " From Sub 1 to" : Return
Sub2:
sVar =sVar & " From Sub 2 to" : Return
Linje1:
sVar =sVar & " Etikett 1"
Linje2:
sVar =sVar & " Etikett 2"
Print sVar
End Sub