当前位置: 首页 > 文档资料 > VBA 中文教程 >

Show 例子 3

优质
小牛编辑
134浏览
2023-12-01

VBA支持以下逻辑运算符。

假设变量A保持10,变量B保持0,则 -

操作者描述
AND称为逻辑AND运算符。 如果两个条件都为True,则表达式为真。a <> 0 AND b <> 0为False。
OR称为逻辑OR运算符。 如果两个条件中的任何一个为True,则条件为真。a <> 0 OR b <> 0为真。
NOT称为逻辑非运算符。 用于反转其操作数的逻辑状态。 如果条件为真,则Logical NOT运算符将为false。NOT(a <> 0 OR b <> 0)为假。
XOR称为逻辑排除。 它是NOT和OR运算符的组合。 如果一个且只有一个表达式的计算结果为True,则结果为True。(a <> 0 XOR b <> 0)为真。

例子 (Example)

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