VBA邏輯運算子 - tw511教學網

以下由VBA支援的邏輯運算子。

假設變數A=10，變數B=0，則 -

運算子	描述	範例
`AND`	邏輯`AND`運算子。如果兩個條件都為真，則表示式為真。	`A<>0 AND B<>0`結果為：`False`
`OR`	邏輯`OR`運算子。如果兩個條件中的任何一個為真，則條件為真。	`A<>0 AND B<>0`結果為：`True`
`NOT`	邏輯`NOT`運算子。用於反轉其運算元的邏輯狀態。如果條件成立，那麼邏輯非運算子結果是條件不成立。	`NOT(a<>0 OR b<>0)`結果為：`False`
`XOR`	邏輯排除。它是`NOT`和`OR`運算子的組合。如果表示式中只有一個表示式的值為`True`，則結果為`True`。	`(a<>0 XOR b<>0)`結果為：`True`

範例

嘗試下面的範例，通過建立一個按鈕並新增以下函式來了解VBA中可用的所有邏輯運算子。

Private Sub Constant_demo_Click()
   Dim a As Integer
   a = 10
   Dim b As Integer
   b = 0

   If a <> 0 And b <> 0 Then
      MsgBox ("AND Operator Result is : True")
   Else
      MsgBox ("AND Operator Result is : False")
   End If

   If a <> 0 Or b <> 0 Then
      MsgBox ("OR Operator Result is : True")
   Else
      MsgBox ("OR Operator Result is : False")
   End If

   If Not (a <> 0 Or b <> 0) Then
      MsgBox ("NOT Operator Result is : True")
   Else
      MsgBox ("NOT Operator Result is : False")
   End If

   If (a <> 0 Xor b <> 0) Then
      MsgBox ("XOR Operator Result is : True")
   Else
      MsgBox ("XOR Operator Result is : False")
   End If
End Sub

執行上面範例程式碼，得到類似下面的結果 -

AND Operator Result is : False

OR Operator Result is : True

NOT Operator Result is : False

XOR Operator Result is : True