Module
Contents
Index 🔎︎

# End Statement

Завершает процедуру или её часть.

## Синтаксис

    End, End Function, End If, End Select, End Sub

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

Инструкция End используется следующим образом.

## Инструкция

End. Не является обязательной, однако может быть введена в любом месте процедуры для завершения выполнения программы.

End Function. Завершает инструкцию Function.

End If. Отмечает конец участка программы If...Then...Else.

End Select. Отмечает конец участка программы Select Case.

End Sub. Завершает инструкцию Sub.

## Пример:

    Sub ExampleRandomSelect

    Dim iVar As Integer

        iVar = Int((15 * Rnd) -2)

        Select Case iVar

            Case 1 To 5

                Print "Число от 1 до 5"

            Case 6, 7, 8

                Print "Число от 6 до 8"

            Case Is > 8 And iVar < 11

                Print "Больше 8"

            Case Else

                Print "Вне диапазона от 1 до 10"

        End Select

    End Sub