IBM Lotus Symphony
|
Prosigue la ejecución del programa dentro de Sub o Function en la línea de procedimiento indicada por una etiqueta.
Consulte Parámetros
Sub/Function
bloque de instrucciones
GoTo Etiqueta1
Etiqueta2:
bloque de instrucciones
Exit Sub
Etiqueta1:
bloque de instrucciones
GoTo Etiqueta2
Final de Sub/Function
La instrucción GoTo se usa para indicar a IBM® Lotus® Symphony™ Basic que continúe la ejecución del programa en otro lugar dentro del procedimiento. La posición debe estar marcada con una etiqueta. Para definir una etiqueta, asigne un nombre y después termínelo con un carácter de dos puntos (":").
Advertencia: la instrucción GoTo no puede usarse para saltar fuera de Sub o Function.
Sub EjemploOnGosub
Dim iVar As Integer
Dim sVar As String
iVar = 2
sVar =""
On iVar GoSub Sub1, Sub2
On iVar GoTo Linea1, Linea2
Exit Sub
Sub1:
sVar =sVar & " De Sub 1 a" : Return
Sub2:
sVar =sVar & " De Sub 2 a" : Return
Linea1:
sVar =sVar & " Etiqueta 2"
Linea2:
sVar =sVar & " Etiqueta 2"
Print sVar
End Sub