作者：绿色风
分类：
时间：2022-08-17
浏览：374
楼主
wise |
Q:VBA中怎样使用like来判断？
A：具体请见如下例子
- Sub likecompare()
- Dim test As Boolean
-
- ' 比较"F"和"F"，返回True
- test = "F" Like "F"
-
- ' 在Option Compare Binary模式下比较"F" 和 "f"，返回True
- test = "F" Like "f"
-
- ' 比较"F"和"FFF"，返回False
- test = "F" Like "FFF"
-
- ' 返回True (判断"aBBBa"是否以一个"a"开头，一个"a"结尾，中间任意个字符？）
- test = "aBBBa" Like "a*a"
-
- ' 返回True (判断 "F" 是否是在字符"A"到"Z"之间)
- test = "F" Like "[A-Z]"
-
- ' 返回 False (判断 "F" 是否不在字符 "A"到"Z"之间)
- test = "F" Like "[!A-Z]"
-
- ' 返回 True (判断 "a2a" 是否为三个字符，同时以字符 "a" 开头和结尾)
- test = "a2a" Like "a#a"
-
- ' 返回 True (判断 "aM5b" 是否匹配以下格式：
- ' 第一位是 "a", 第二位在字符 "L" 到 "P" 之间,
- ' 第三位是任意单个字符, 第四位字符不在字符 "c" 到 "e"之间
- test = "aM5b" Like "a[L-P]#[!c-e]"
-
- ' 返回 True (判断 "BAT123khg" 是否匹配以下格式：
- ' 以字符 "B" 开头, 第二位是单个数字，第三位是字符 "T", 后面跟任意字符)
- test = "BAT123khg" Like "B?T*"
-
- ' 返回 False (判断 "CAT123khg"是否匹配以下格式：
- ' 以字符 "B" 开头, 第二位是单个数字，第三位是字符 "T", 后面跟任意字符)
- test = "CAT123khg" Like "B?T*"
- End Sub
|
2楼
omnw |
很实用，在比较字符串时经常要用。一般情况下都要配合通配符使用。 |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一