VBA基本语法之逻辑运算符通配符，有什么作用，它们该怎么使用

　　上一篇文章中给大家分享了VBA基本语法中的算术运算符，比较运算符。
　　今天就给大家分享一下另外两个比较重要的运算符，一个逻辑运算符和一个通配符。
　　什么是逻辑运算符？
　　逻辑运算符一般是应用于判断逻辑运算式的真或者是假，返回值只能是真（True）或者假（False）。
　　❶And 这是逻辑＂与＂运算，表达式A与表达式B 当表达式A和表达式B的值都是真（True）时返回值也为真（True），否则返回值是假（False）。
　　❷Or 这是逻辑＂或＂运算，表达式A或表达式B 当表达式A和表达式B中有一个表达式的值为真（True），返回值就为真（True），否则返回值（False）。
　　❸Not 这是逻辑＂非＂运算，Not表达式A ，表达式A的值为真（True）时返回False，否则返回True。
　　❹Xor 这是逻辑＂异或＂，表达式A 异或 表达式B返回的值不相同时，返回真（True），否则返回False。
　　❺Eqv 这是逻辑＂等价＂运算，表达式A 等价 表达式B，表达式A和表达式B返回的值相同时，返回真（True），否则返回False。
　　举例子要使用的数据表格：
　　逻辑与和或举例：
　　代码1：
　　Sub hhand()
　　If Worksheets(＂sheet31＂).Range(＂C2＂) > 80 And Worksheets(＂sheet31＂).Range(＂E2＂) > 70 Then
　　Worksheets(＂sheet31＂).Range(＂G2＂).Font.Color = RGB(180, 0, 0)
　　End If
　　End Sub
　　代码2：
　　Sub hhor()
　　If Worksheets(＂sheet31＂).Range(＂C3＂) > 60 Or Worksheets(＂sheet31＂).Range(＂E3＂) > 70 Then
　　Worksheets(＂sheet31＂).Range(＂G3＂).Font.Color = RGB(0, 255, 0)
　　End If
　　End Sub
　　逻辑异或举例子：
　　Sub xor1()
　　If Worksheets(＂sheet31＂).Range(＂C4＂) > 80 Xor Worksheets(＂sheet31＂).Range(＂E4＂) > 60 Then
　　Worksheets(＂sheet31＂).Range(＂G4＂).Font.Color = RGB(0, 0, 255)
　　End If
　　If Worksheets(＂sheet31＂).Range(＂C5＂) > 80 Xor Worksheets(＂sheet31＂).Range(＂E5＂) > 90 Then
　　Worksheets(＂sheet31＂).Range(＂G5＂).Font.Color = RGB(0, 0, 255)
　　End If
　　If Worksheets(＂sheet31＂).Range(＂C6＂) > 90 Xor Worksheets(＂sheet31＂).Range(＂E6＂) > 90 Then
　　Worksheets(＂sheet31＂).Range(＂G6＂).Font.Color = RGB(0, 0, 255)
　　End If
　　End Sub
　　一起看看通配符
　　通配符是VBA程序中不可缺少的，作用也是很大的。
　　❶＂*＂ 表示任意多个字符。
　　❷＂？＂表示任意的一个字符。
　　❸＂#＂表示任意的一个数字。
　　❹[charlist]表示位于charlist中的任意一个字符。
　　❺[!charlist]表示不在charliat中的任意一个字符。
　　通配符举例子：
　　代码：
　　Sub tpf()
　　Dim i As Integer
　　For i = 2 To 8
　　If Worksheets(＂sheet31＂).Cells(i, 2).Value Like ＂李*＂ Then
　　Worksheets(＂sheet31＂).Cells(i,8)=Worksheets(＂sheet31＂).Cells(i, 2).Value
　　Worksheets(＂sheet31＂).Cells(i, 8).Font.Color = RGB(0, 0, 255)
　　End If
　　Next
　　End Sub
　　今天就先给大家分享到这里，喜欢的请关注我，谢谢！
　　明天继续分享这些符号的优先级，然后在举一些例子。