End 语句

立即终止执行。

语法

End  

备注

你可以将 End 语句放在过程中的任何位置以强制整个应用程序停止运行。 End 关闭使用 Open 语句打开的所有文件并清除所有应用程序的变量。 一旦没有其他程序持有对其对象的引用并且没有任何代码在运行,应用程序就会关闭。

注意

End 语句突然停止代码执行,并且不调用 DisposeFinalize 方法或任何其他 Visual Basic 代码。 其他程序持有的对象引用无效。 如果在 TryCatch 块中遇到 End 语句,则控制不会传递到相应的 Finally 块。

Stop 语句将暂停执行,但与 End 不同的是,它不会关闭任何文件或清除任何变量,除非是在已编译的可执行 (.exe) 文件中遇到。

由于 End 终止应用程序而不处理任何可能打开的资源,因此在使用它之前,你应尝试完全关闭应用程序。 例如,如果你的应用程序打开了任何表单,你应该在控制到达 End 语句之前关闭它们。

你应该谨慎使用 End,并且仅在需要立即停止时使用。 终止过程的正常方法(Return 语句Exit 语句)不仅完全关闭过程,而且还使调用代码能够完全关闭。 例如,一个控制台应用程序可以从 Main 过程中简单地 Return

重要

End 语句调用 System 命名空间中 Environment 类的 Exit 方法。 Exit 要求你获得 UnmanagedCode 权限。 如果不这样做,则会发生 SecurityException 错误。

当后跟一个附加关键字时,End <关键字>语句描述了适当过程或块的定义的结束。 例如,End Function 会终止 Function 过程的定义。

示例

以下示例使用 End 语句在用户请求时终止代码执行。

Sub Form_Load()
    Dim answer As MsgBoxResult
    answer = MsgBox("Do you want to quit now?", MsgBoxStyle.YesNo)
    If answer = MsgBoxResult.Yes Then
        MsgBox("Terminating program")
        End
    End If
End Sub

智能设备开发者笔记

不支持此语句。

另请参阅