表达式中的常量、变量、函数等都依靠运算符连接,VBA中的运算符分为4类:算术运算符、比较运算符、逻辑运算符、连接运算符。下面将分别介绍。
1.算术运算符
VBA中共有7种运算符,如下表所示。
示例如下:
Sub Sameple2241()
Dim I As Integer, J As Long
Dim K As Single
I = 2
J = 3
K = I + J '结果等于5
K = J – I '结果等于1
K = I * J '结果等于6
K = I / J '结果等于0.667
K = I \ J '结果等于0
K = I ^ J '结果等于8
K = -I '结果等于-2
K = J Mod I '结果等于1
End Sub
2.比较运算符
在VBA中,有7种比较运算符,如下表所示。
示例如下:
Sub Sameple2242()
Dim I As Integer, J As Long
Dim H As Object, F As Object
Dim s1 As String, s2 As String, s3 As String
Dim K As Boolean
I = 2
J = 3
s1 = "abcde"
s2 = "cdefg"
s3 = "dc"
K = I > J '结果等于False
K = J >= I '结果等于True
K = I < J '结果等于True
K = I <= J '结果等于True
K = I <> J '结果等于True
K = (I = J) '结果等于False
K = F Is H '结果等于True
K = s2 Like "cd*" '结果等于True
K = s1 Like "da*" '结果等于False
End Sub
3.逻辑运算符
VBA中,有6种逻辑运算符,如下表所示。
示例如下:
Sub Sameple2243()
Dim A As Integer, B As Integer, C As Integer, D, MyCheck
A = 10: B = 8: C = 6: D = Null ' 设置变量初值
MyCheck = A > B Xor B > C ' 返回 False
MyCheck = B > A Xor B > C ' 返回 True
MyCheck = B > A Xor C > B ' 返回 False
MyCheck = B > D Xor A > B ' 返回 Null
MyCheck = Not (A > B) ' 返回 False
MyCheck = Not (B > A) ' 返回 True
MyCheck = Not (C > D) ' 返回 Null
MyCheck = A > B Or B > C ' 返回 True
MyCheck = B > A Or B > C ' 返回 True
MyCheck = A > B Or B > D ' 返回 True
MyCheck = B > D Or B > A ' 返回 Null
MyCheck = A > B And B > C ' 返回 True
MyCheck = B > A And B > C ' 返回 False
MyCheck = A > B And B > D ' 返回 Null
MyCheck = A > B Eqv B > C ' 返回 True
MyCheck = B > A Eqv B > C ' 返回 False
MyCheck = A > B Eqv B > D ' 返回 Null
MyCheck = A > B Imp B > C ' 返回 True
MyCheck = A > B Imp C > B ' 返回 False
MyCheck = B > A Imp C > B ' 返回 True
MyCheck = B > A Imp C > D ' 返回 True
MyCheck = C > D Imp B > A ' 返回 Null
End Sub
4.连接运算符
符号“&”和“+”的作用是将两个表达式作为字符串强制连接在一起,语法格式是:
result = expression1 & expression2或
result = expression1 + expression2
5.运算符的优先级别
在编写程序时,经常用到比较复杂的表达式,表达式中包含了大量的变量和运算符,运算符的优先顺序是:算术运算符、比较运算符、逻辑运算符。所有比较运算符的优先顺序都相同,也就是说,要按它们出现的顺序从左到右进行处理。
各种运算符的运算优先顺序如下表所示。