End Statement

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

Синтаксис


End, End Enum, End Function, End If, End Select, End Sub, End With

Параметры:

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

Инструкция

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

End Enum: Ends an Enum VBA statement

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

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

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

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

End With: Ends a With statement

Пример:


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

Please support us!