共用方式為


陳述結束

結束 程序 或封鎖。

語法

End
終端功能
End If
End 屬性
結束選取
字幕結束
端型
結尾

End 語句語法具有以下形式:

陳述式 描述
End 立即終止執行。 它本身並非必須,但可以放置在程序中的任何位置,用來結束程式碼執行、關閉以 Open 陳述式開啟的檔案,以及清除 變數
終端功能 必須結束 一個函式 陳述。
End If 必須結束一個區塊 ,如果......當時。。。其他 陳述。
End 屬性 結束 物業租賃物業取得物業設定 程序所必須。
結束選取 必須結束 選擇案件 陳述。
字幕結束 必須結束 分級 陳述。
端型 必須結束 使用者定義型別 定義 ( 態陳述式) 。
結尾 必須以 With 陳述結尾。

註解

執行時, End 陳述式會重置所有 模組層級 變數及所有 模組中的靜態局部變數。 為了保留這些變數的值,請改用 Stop 陳述式。 你可以在保留變數值的同時繼續執行。

注意事項

End 敘述會突然停止程式碼執行,且不會呼叫 Unload、QueryUnload 或 Terminate 事件,或任何其他 Visual Basic 程式碼。 你在 表單類別模組 的 Unload、QueryUnload 和 Terminate 事件中放置的程式碼不會被執行。 由類別模組建立的物件會被銷毀,使用 Open 陳述式開啟的檔案會關閉,程式使用的記憶體也會被釋放。 其他程式持有的物件參考會失效。

結束語句提供了一種強制停止程式的方法。 如果是正常終止 Visual Basic 程式,你應該卸載所有表單。 當沒有其他程式持有從你公開類別模組建立的物件參考,且沒有程式碼執行時,程式就會關閉。

範例

此範例使用 End 陳述式,若使用者輸入無效密碼,則終止程式碼執行。

Sub Form_Load 
  Dim Password, Pword 
  PassWord = "Swordfish" 
  Pword = InputBox("Type in your password") 
  If Pword <> PassWord Then 
    MsgBox "Sorry, incorrect password" 
    End
  End If
End Sub

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應