Модуль
Зміст
Покажчик 🔎︎

# Інструкція On...GoSub; інструкція On...GoTo

Вибирає один з варіантів виконання програми залежно від значення числового виразу.

## Синтаксис:

    On Числ_вираз GoSub Мітка1[, Мітка2[, Мітка3[,...]]]

    On Числ_вираз GoTo Мітка1[, Мітка2[, Мітка3[,...]]]

## Параметри:

Числ_вираз. Числовий вираз від 0 до 255, що визначає, по якій гілці буде виконуватися програма. Якщо Числ_вираз рівний 0, інструкція виконуватися не буде. Якщо Числ_вираз більший за 0, програма переходить до мітки з номером позиції, що відповідає цьому виразу (1 = Перша_мітка; 2 = Друга_мітка)

Мітка: контрольний рядок, що відповідає структурі GoTo або GoSub.

Угоди GoTo або GoSub є чинними.

## Приклад:

    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 & " Із процедури 1 в" : Return

    Sub2:

        sVar =sVar & " Із процедури 2 в" : Return

    Line1:

        sVar =sVar & " Мітка 1" : GoTo Ende

    Line2:

        sVar =sVar & " Мітка 2"

    Ende:

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

    End Sub