IBM Lotus Symphony
|
Continua a execução do programa em um Sub ou Function na linha de procedimentos indicada por uma etiqueta.
Consulte Parâmetros
Sub/Function
bloco de instruções
GoTo Label1
Label2:
bloco de instruções
Exit Sub
Label1:
bloco de instruções
GoTo Label2
End Sub/Function
Use a instrução GoTo para instruir o IBM® Lotus® Symphony™ Basic para continuar a execução do programa em outro local dentro do procedimento. A posição deve ser indicada por uma etiqueta. Para definir uma etiqueta, atribua um nome e, em seguida, termine-o com dois pontos (":").
Aviso: Você não pode usar a instrução GoTo para sair de um Sub ou 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