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 Sub
當執行上面的腳本時，會產生類似下麵的結果。
Operator Line 1 : False
Operator Line 2 : True
Operator Line 3 : False
Operator Line 4 : True
Operator Line 5 : False
Operator Line 6 : True