VBA - 逻辑运算符

VBA 支持以下逻辑运算符。

假设变量 A 为 10，变量 B 为 0，则：

运算符	描述	示例
AND	称为逻辑 AND 运算符。如果两个条件都为真，则表达式为真。	a<>0 AND b<>0 为假。
OR	称为逻辑 OR 运算符。如果两个条件中的任何一个为真，则条件为真。	a<>0 OR b<>0 为真。
NOT	称为逻辑 NOT 运算符。用于反转其操作数的逻辑状态。如果一个条件为真，则逻辑 NOT 运算符将使其为假。	NOT(a<>0 OR b<>0) 为假。
XOR	称为逻辑异或。它是 NOT 和 OR 运算符的组合。如果只有一个表达式计算结果为真，则结果为真。	(a<>0 XOR b<>0) 为真。

示例

尝试以下示例，通过创建一个按钮并添加以下函数来了解 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

当您将其保存为 .html 文件并在 Internet Explorer 中执行它时，上述脚本将产生以下结果。

AND Operator Result is : False

OR Operator Result is : True

NOT Operator Result is : False

XOR Operator Result is : True

vba_operators.htm

打印页面