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