IBM Lotus Symphony
|
Sub や Function などのブロック中で、プログラムの実行行をラベル指定された位置に移動させます。
パラメータを参照
Sub/Function
ステートメントブロック
GoTo Label1
Label2:
ステートメントブロック
Exit Sub
Label1:
ステートメントブロック
GoTo Label2
End Sub/Function
GoTo ステートメントは、IBM® Lotus® Symphony™ Basic に対して、プログラムの実行行をプロシージャの他の位置に移動して続行するように指示します。移動先はラベルで指示する必要があります。個々のラベルは、ラベル名に続けてコロンを入力することで指定します。
警告: GoTo ステートメントを使って、Sub や Function などのブロック外へジャンプすることはできません。
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
Line1:
sVar =sVar & " Label 1"
Line2:
sVar =sVar & " Label 2"
Print sVar
End Sub