IBM Lotus Symphony


Stavek On...GoSub; stavek On...GoTo [izvajalno okolje]

Razcepi eno od več podanih vrstic v programski kodi glede na vrednost številskega izraza.

Skladnja:

On N GoSub Label1[, Label2[, Label3[,...]]]

On NumExpression GoTo Label1[, Label2[, Label3[,...]]]

Parametri:

NumExpression: Katerikoli številski izraz med 0 in 255, ki določa, na katere vrstice naj se program razcepi. Če je NumExpression 0, se stavek ne izvrši. Če je NumExpression večji od 0, program skoči na nalepko, ki ima številko položaja, ki ustreza izrazu (1 = First label; 2 = Second label).

Label: Ciljna vrstica glede na strukturo GoTo ali GoSub.

Ikona opombe Veljavno je pravilo GoTo ali GoSub.

Primer:

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 & " Od Sub 1 do " : Return

Sub2:

sVar =sVar & " Od Sub 2 do " : Return

Line1:

sVar =sVar & " Nalepka 1" : GoTo Ende

Line2:

sVar =sVar & " Nalepka 2"

Ende:

MsgBox sVar,0,"On...Gosub"

End Sub


Povratne informacije o izdelku | Dodatna dokumentacija | Blagovne znamke