在阅读上文的过程中，我们已对VBA中存在的四种运算符类别有所认识，这包括算术运算符、比较运算符、逻辑（关系）运算符以及连接运算符。此前，我们已经对算术和比较这两种运算符进行了介绍，而在此，我们将继续探讨剩余的两种运算符。

逻辑（关系）运算符

逻辑运算中的符号涵盖以下几种：与运算符（AND）、或运算符（OR）、非运算符（NOT）以及异或运算符（XOR）。

Sub 逻辑运算符测试() '与，或，非，异或 Dim a, b As Integer a = 10 b = 0 '逻辑运算符通常结合If 判断语句来进行使用 'And If a <> 0 And b <> 0 Then 执行打印操作，输出“a与b不等于0”，并显示布尔值True。 Else 在打印输出时，程序将显示“a与b中存在数值为零的情况”，并伴随False值。 End If 'Or If a <> 0 Or b <> 0 Then 执行打印操作，输出“a不等于零”或“b不等于零”，同时显示True值。 Else 打印出“当a和b均等于0时的情况”，并显示False。 End If 'Not If Not a <> 0 Then

Debug.Print True & " a等于0 " Else Debug.Print False & " a不等于0 " End If 'XOR 异或 异或的原则是不同则真 If (a <> 0 Xor b <> 0) Then 执行打印操作，输出值为真，并显示“一真一假即为真”。 Else 执行Debug.Print操作，输出"同真同假即为假"，并附加一个False值。 End If End Sub '结果 'False a与b其中有等于0的 'True a不等于0 或者 b不等于0 'False a不等于0 'True 一真一假即为真

连接操作符

连接操作符包括：“ + ” ，“ & ”。

Sub 连接操作符() '+ , & Dim a, b As Variant Dim sum As Variant '连接为数字时 a = 10 b = 5 sum = a + b

在执行Debug.Print操作时，会输出“' + ' 连接后作为数字的sum值为”并紧接着显示sum的具体数值。 sum = a & b 在执行Debug.Print操作时，输出显示：“单引号与单引号相连接后，转换成数字的sum值为”并紧接着显示sum的具体数值。 '连接为字符时 a = "学习" b = "VBA" sum = a + b 在执行Debug.Print操作时，输出显示“' + '连接后形成的字符序列中，sum的值为”与原句中的sum值。 sum = a & b 当将“'”与“'”这两个字符进行拼接操作后，输出的信息将表明sum的值是： End Sub '结果 当将“+”与“+”符号连接起来表示数值时，sum的值等于15。 将“&”与“&”符号组合起来表示数字时，其总和数值为105。 当将两个字符串通过加号连接起来时，sum变量用于学习VBA。 当字符“&”用于连接时，sum变量负责学习VBA。

综合运用上述四种运算符，我们可以观察到，比较运算符与逻辑（关系）运算符常常与if条件判断语句相配合，而在使用连接操作符时，需留意变量的数据类型以确定选用何种操作符；至于算数运算符，它们一般应用于数值计算领域。

VBA 很简单，多敲代码，孰能生巧。。。