以下由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