Unbedingter Sprung mit Rückkehr (GoSub)

GOSUB ist ein Sprung zum ausführbaren Code nach einem Label. Der Code unterhalb des Labels muss mit dem Befehl END GOSUB abgeschlossen werden oder mit END FUNCTION oder EXIT FUNCTION bzw. RETURN die Ausführung der Funktion beendet werden.

Nach Erreichen des Befehls END GOSUB wird in der Programmzeile nach dem GOSUB fortgesetzt.

Function TuWas(ByVal Parameter1 As Long) As Long

   If Parameter1 = 10 Then

      Gosub Sprungmarke

   End If

   If Parameter1 = 20 Then

      Return 20

   End If

   Return 0

Label Sprungmarke

   Parameter1 := Parameter1 + 20

End Gosub

End Function