IBM Lotus Symphony


Príkaz On...GoSub; Príkaz On...GoTo [Runtime]

Vetví sa na jeden z viacerých riadkov, špecifikovaných v kóde programu v závislosti od hodnoty numerického výrazu.

Syntax:

On N GoSub návestie_1[, návestie_2[, návestie_3[,...]]]

On numerický_výraz GoTo návestie_1[, návestie_2[, návestie_3[,...]]]

Parametre:

Numerický_výraz: ľubovoľný numerický výraz medzi 0 a 255, ktorý určuje, na ktoré riadky sa program vetví. Ak je číselný_výraz = 0, príkaz sa nevykoná. Ak je číselný_výraz väčší ako 0, program vykoná skok na návestie s číslom polohy, ktoré zodpovedá výrazu (1 = prvé návestie; 2 = druhé návestie)

Návestie: Cieľová čiara podľa štruktúry GoTo alebo GoSub.

Ikona poznámky Konvencia GoTo alebo GoSub je platná.

Príklad:

Sub Príklad_On_Gosub

Dim iVar ako typ Integer

Dim sVar ako typ String

iVar = 2

sVar =""

On iVar GoSub Sub1, Sub2

On iVar GoTo riadok_1, riadok_2

Exit Sub

Sub1:

sVar =sVar & " Zo Sub 1 do" : Return

Sub2:

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

riadok_1:

sVar =sVar & " návestie 1" : GoTo Ende

riadok_2:

sVar =sVar & " návestie 2"

Ende:

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

End Sub


Spätná väzba na produkt | Ďalšia dokumentácia | Ochranné známky