# VBA 邏輯運算符：AND，OR，NOT > 原文： [https://www.guru99.com/vba-logical-operators.html](https://www.guru99.com/vba-logical-operators.html) VBA Logical Operators: AND, OR, NOT ## 邏輯運算符 假設您要處理客戶訂單。 為此，您想首先檢查訂購的產品是否存在。 如果是這樣，您還想檢查現有數量是否足夠。 在這種情況下，邏輯運算符會派上用場。 邏輯運算符用于評估多個條件。 | **S / N** | **運算符** | **說明** | **范例** | **輸出** | | 1 | 和 | AND：用于組合多個條件。 如果所有條件都為真，則 AND 評估為真。 如果任何條件為假，則 AND 的計算結果為假 | 如果 true = true AND false = true 然后 | 假 | | 2 | 要么 | 或：這用于組合多個條件。 如果任何條件評估為 true，則 OR 返回 true。 如果它們全都為假，或返回假 | 如果 true = true 或 true = false 則 | 真正 | | 3 | 不 | 不是：這就像一個逆函數。 如果條件為 true，則返回 false，如果條件為 false，則返回 true。 | 如果不是（真），則 | false | ### 示例源代碼 為了簡單起見，我們將比較硬編碼的數字。 從“插入選項”將 ActiveX 按鈕添加到工作表中。 設置屬性，如下圖所示  下表顯示了您需要更改的屬性以及也需要更新的值。 | **S/N** | **控件** | **屬性** | **值** | | 1 | CommandButton1 | Name | btnAND | | | | 標題 | AND 運算子（0 = 0） | | 2 | CommandButton2 | Name | btnOR | | | | Caption | 或運算符（1 = 1）或（5 = 0） | | 3 | CommandButton3 | Name | btnNOT | | | | Caption | NOT 運算符 Not（0 =） | 將以下代碼添加到 btnAND_Click ``` Private Sub btnAND_Click() If (1 = 1) And (0 = 0) Then MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator" Else MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator" End If End Sub ``` **此處，** * **“ If（1 = 1）和（0 = 0）然后”** if 語句使用 AND 邏輯運算符組合兩個條件（1 = 1）和（0 = 0）。 如果兩個條件都成立，則執行“ Else”關鍵字上方的代碼。 如果兩個條件都不成立，則執行“ Else”關鍵字下面的代碼。 將以下代碼添加到 btnOR_Click ``` Private Sub btnOR_Click() If (1 = 1) Or (5 = 0) Then MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator" Else MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator" End If End Sub ``` **此處，** * **“ If（1 = 1）或（5 = 0）然后”** if 語句使用 OR 邏輯運算符組合兩個條件（1 = 1）和（5 = 0）。 如果滿足任何條件，則執行 Else 關鍵字上方的代碼。 如果兩個條件都為假，則執行 Else 關鍵字下面的代碼。 將以下代碼添加到 btnNOT_Click ``` Private Sub btnNOT_Click() If Not (0 = 0) Then MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator" Else MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator" End If End Sub ``` **HERE,** * **“如果不是（0 = 0）那么”** if 語句使用 NOT 邏輯運算符來取反條件的結果。 如果條件為真，則執行“ Else”關鍵字下面的代碼。 如果條件為真，則執行 Else 關鍵字上方的代碼。 [下載包含上述代碼](https://drive.google.com/uc?export=download&id=0BwL5un1OyjsdTUlHcXZmVXBjZms)的 Excel