Modul
Vsebina
Kazalo 🔎︎

# Ukaz On...GoSub; On...GoTo

Razveja izvajanje na eno od več navedenih vrstic v programski kodi, odvisno od numeričnega izraza.

## Skladnja:

    On N GoSub Oznaka1[, Oznaka2[, Oznaka3[,...]]]

    On NumIzraz GoTo Oznaka1[, Oznaka2[, Oznaka3[,...]]]

## Parametri:

NumIzraz: poljuben numerični izraz med 0 in 255, ki odloča, na katero od navedenih vrstic bo program preskočil. Če je NumIzraz nič, se ukaz ne izvede. Če je NumIzraz večji od nič, potem skoči program na točko, katere zaporedna številka odgovarja izrazu (1 = prva oznaka; 2 = druga oznaka)

Oznaka: Ciljna vrstica glede na strukturo GoTo ali GoSub.

Konvencije za GoTo ali GoSub pri tem veljajo.

## Primer:

    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:

        sSpr =sSpr & " Iz Proc 1 v" : Return

    Sub2:

        sSpr =sSpr & " Iz Proc 2 v" : Return

    Line1:

        sVar =sVar & " Oznako 1" : GoTo Konec

    Line2:

        sSpr =sSpr & " Oznaka 2"

    Ende:

        MsgBox sVar,0,"On...GoSub"

    End Sub