Modul
Isi
Indeks 🔎︎

# Pernyataan On...GoSub; Pernyataan On...GoTo

Cabang ke salah satu dari beberapa baris yang ditentukan dalam kode program, tergantung pada nilai ekspresi numerik.

## Sintaksis:

    On N GoSub Label1[, Label2[, Label3[,...]]]

    On NumExpression GoTo Label1[, Label2[, Label3[,...]]]

## Parameter:

TandaNum: Tanda numerik apa pun antara 0 dan 255 yang menentukan baris mana yang dituju program. Jika TandaNum adalah 0, pernyataan itu tidak dieksekusi. Jika TandaNum lebih besar dari 0, program melompat ke label yang memiliki nomor posisi yang sesuai dengan Tanda (1 = Label pertama; 2 = Label kedua)

Label: Baris target sesuai dengan GoTo atauGoSubstruktur.

Konvensi Pergi ke Sub atau Pergi ke Sub valid.

## Contoh:

    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 & " Dari Sub 1 ke" : Return

    Sub2:

        sVar =sVar & " Dari Sub 2 ke" : Return

    Line1:

        sVar =sVar & " Label 1" : GoTo Ende

    Line2:

        sVar =sVar & " Label 2"

    Ende:

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

    End Sub