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