转自:http://hi.baidu.com/0601024084/blog/item/a33227a6ff989edb7cd92a0f.html
Like运算符是字符串比较时经常使用的运算符,也是VBA较难掌握的运算符。
语法:
结果 = 字符串 Like 模式
如果字符串与模式匹配,结果为True,否则为False。但是如果Like两端的字符串和模式有一个为Null,则结果为Null。
VBA内建的模式匹配功能提供了丰富的字符串比较方式,在模式表达式中可以使用通配符、字符列表(或字符区间)的任何组合来匹配字符串。
模式中的字符 与模式匹配的字符串中的字符
? 任何单一字符
* 零个或多个字符
# 任何一个数字(0-9)
[字符列表] 字符列表中的任何一个字符
[!字符列表] 不在字符列表中的任何一个字符
其它字符(串) 与自身匹配
1.Like在字符串比较时受Option Compare语句的影响,在默认情况下(Option Compare Binary),字符比较根据内部二进制表示法(ASCII码)进行,是区分大小写的,此时 "A" Like "a" 的结果为False。如果声明了Option Compare Text,则不区分大小写比较,"A" Like "a" 的结果为True。
后面的讨论假设默认情况下。
2.如果模式中没有使用通配符(?、*、#)和字符列表,此时Like运算符等价于=(等号)运算符。下面表达式的结果相同。
s Like "AB"
s = "AB"
3.字符列表
理解字符列表的用法是学会Like的难点,所以,下面我会多花些笔墨帮你理解它。
(1)一个字符列表匹配的是字符串中的一个字符,不管字符列表中实际有多少个字符。
"A" Like [ABCDEGHIJ2345] 结果为True
"AB" Like [ABCDEGHIJ2345] 结果为False
唯一的例外是[]被看作长度为零的字符串。
(2)字符列表中的单个字符,没有顺序要求,上面[ABCDEGHIJ2345]和[ACDEGHIJ2345B]、[3ABCDEGHIJ245]...等等是一样的表达。
(3)字符列表中一段连续的字符(称为区间,一个字符列表可以有多个区间,广义上,单个字符也可被看作一个区间),可以使用连字符(-,减号)简化表达式,如上面的表达式[ABCDEGHIJ2345]可以简化为[A-EG-J2-5],连字符要遵循从小到大的顺序(升序),即连字符(-)右端的字符应大于左端的字符,如其中的A-E不能写成E-A,后者系统会报错。但多个区间之间没有顺序要求,这意味着[G-J2-5A-E]、[2-5G-JA-E]...等是同一表达。但下面的表达是错误的,同时也是常见的:
[A-E G-J 2-5]、[A-E,G-J,2-5]、[A-E;G-J;2-5]
也许只是一种习惯或想当然,第一个除了要求表达的ABCDEGHIJ2345外,还多加了一个空格;后面两个分别多了逗号(,)和分号(;)。
"," Like [A-EG-J2-5] 结果为False
"," Like [A-E,G-J,2-5] 结果为True
(4)被中括号([])括起的字符列表中的字符,?、*、#不被理解为通配符,而是表示符号自身。如果要表示-(减号,连字符),可以放在列表的开头或结尾。如[ABC-]、[-ABC]。
"3" Like "?" 结果为True
"3" Like "[?]" 结果为False
"?" Like "[?]" 结果为True
这一特性通常被用作特殊字符的表示,例如,除了通配符外, 左括号 ([)等特殊字符都可以将它们用方括号括起来。要注意的是,也不能在一个组内使用右括号 (]) 与自身匹配,但在组外可以作为个别字符使用。
(5)在字符列表加上!(感叹号)开头,表示要匹配的是不在字符列表中的任一字符(不包括开头的!自身)。[!!]表示除了感叹号之外的任一字符。
5.例子
下面是EXCEL/VBA帮助中举的几个Like运算符的例子,对照结果看看,如果和你想的结果都一样,说明你已经基本掌握了Like用法。
Dim MyCheck
MyCheck = "aBBBa" Like "a*a" ' 返回 True。
MyCheck = "F" Like "[A-Z]" ' 返回 True。
MyCheck = "F" Like "[!A-Z]" ' 返回 False。
MyCheck = "a2a" Like "a#a" ' 返回 True。
MyCheck = "aM5b" Like "a[L-P]#[!c-e]" ' 返回 True。
MyCheck = "BAT123khg" Like "B?T*" ' 返回 True。
MyCheck = "CAT123khg" Like "B?T*" ' 返回 False。