共用方式為

Assert 方法

  • 發行項

當 booleanexpression 在方法出現的行傳回 False 時，有條件地暫停執行。

語法

物件。Assertbooleanexpression

Assert 方法語法具有下列物件辨識符號和自變數：

部分 描述
物件 此為必要動作。 一律為 Debug 物件。
booleanexpression 此為必要動作。 評估為 True 或 False 的表達式。

註解

判斷 提示調用只能在 開發環境中運作。 當 模組 編譯成可執行檔時，會省略 Debug 物件上的方法呼叫。

一律會評估所有 布爾值表達式 。 例如，即使 And 表達式的第一個部分評估為 False，也會評估整個運算式。

範例

下列範例示範如何使用 Assert 方法。 此範例需要具有兩個按鈕控件的表單。 默認按鈕名稱為 Command1 和 Command2。

當範例執行時，按兩下 Command1 按鈕會將按鈕上的文字切換到 0 到 1 之間。 按兩下 Command2 不會執行任何動作，或根據 Command1 上顯示的值而造成判斷提示。 判斷提示會停止執行，並反白顯示最後一個執行的語句 Debug.Assert 行。

Option Explicit
Private blnAssert As Boolean
Private intNumber As Integer

Private Sub Command1_Click()
    blnAssert = Not blnAssert
    intNumber = IIf(intNumber <> 0, 0, 1)
    Command1.Caption = intNumber
End Sub

Private Sub Command2_Click()
    Debug.Assert blnAssert
End Sub

Private Sub Form_Load()
    Command1.Caption = intNumber
    Command2.Caption = "Assert Tester"
End Sub

另請參閱

支援和意見反應

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