VBA比较运算符

VBA支持的比较运算符如下所示。

假设变量A=10，变量B=20，则 -

运算符	描述	示例
=	检查两个操作数的值是否相等。如果是，那么条件是真。	(A = B)结果为：False
<>	检查两个操作数的值是否不相等。如果值不相等，则条件为真。	(A <> B)结果为：True
>	检查左操作数的值是否大于右操作数的值。如果是，那么条件是真。	(A > B)结果为：False
<	检查左操作数的值是否小于右操作数的值。如果是，那么条件是真。	(A < B)结果为：True
>=	检查左操作数的值是否大于或等于右操作数的值。 如果是，那么条件是真。	(A >= B)结果为：False
<=	检查左操作数的值是否小于或等于右操作数的值。如果是，那么条件是真。	(A <= B)结果为：True

示例

尝试以下示例以了解VBA中可用的所有比较运算符。

Private Sub Constant_demo_Click()
   Dim a: a = 10
   Dim b: b = 20
   Dim c

   If a = b Then
      MsgBox ("Operator Line 1 : True")
   Else
      MsgBox ("Operator Line 1 : False")
   End If

   If a<>b Then
      MsgBox ("Operator Line 2 : True")    
   Else
      MsgBox ("Operator Line 2 : False")    
   End If

   If a>b Then
      MsgBox ("Operator Line 3 : True")    
   Else
      MsgBox ("Operator Line 3 : False")    
   End If

   If a<b Then
      MsgBox ("Operator Line 4 : True")    
   Else
      MsgBox ("Operator Line 4 : False")    
   End If

   If a>=b Then
      MsgBox ("Operator Line 5 : True")    
   Else
      MsgBox ("Operator Line 5 : False")    
   End If

   If a<=b Then
      MsgBox ("Operator Line 6 : True")
   Else
      MsgBox ("Operator Line 6 : False")
   End If

End 

当执行上面的脚本时，会产生类似下面的结果。

Operator Line 1 : False

Operator Line 2 : True

Operator Line 3 : False

Operator Line 4 : True

Operator Line 5 : False

Operator Line 6 : True

 

转载于:https://www.cnblogs.com/sunyllove/p/11348080.html