共用方式為

End 陳述式

  • 發行項

立即終止執行。

語法

End

備註

您可以將 End 陳述式放在程序中的任何位置，以強制整個應用程式停止執行。 End 會關閉以 Open 陳述式開啟的任何檔案，並清除所有應用程式的變數。 只要沒有任何其他程式保有對其物件的參考，而且沒有任何程式碼正在執行，應用程式就會立即關閉。

注意

End 陳述式會突然停止程式碼執行，而且不會叫用 Dispose 或 Finalize 方法或是任何其他 Visual Basic 程式碼。 其他程式所持有的物件參考會失效。 如果在 Try 或 Catch 區塊內遇到 End 陳述式，則不會將控制權傳遞至對應的 Finally 區塊。

Stop 陳述式會暫停執行，但不同於 End，除非是在編譯過的可執行檔 (.exe) 中遇到，否則其不會關閉任何檔案或清除任何變數。

因為 End 會終止您的應用程式，而不會處理任何可能開啟的資源，所以您應該先試著完全關閉，然後再加以使用。 例如，若您的應用程式已開啟任何表單，則您應該在控制權觸達 End 陳述式之前加以關閉。

您應該謹慎使用 End，而且只有在需要立即停止時才使用。 終止程序的一般方式 (Return 陳述式和 Exit 陳述式) 不只會完全關閉程序，也會讓呼叫程式碼有機會完全關閉。 例如，主控台應用程式只能從 Main 程序進行 Return。

重要

End 陳述式會呼叫 System 命名空間中 Environment 類別的 Exit 方法。 Exit 需要您具備 UnmanagedCode 權限。 如果沒有，就會發生 SecurityException 錯誤。

當後面接著其他關鍵字時，End <keyword> 陳述式就會描述適當程序或區塊定義的結尾。 例如，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

智慧型裝置開發人員注意事項

不支援此陳述式。

另請參閱