Question

Excel VBA中如何判断变量是否包含特定字符串？

Answer 1

Excel VBA中判断变量包含特定字符串，一般用vba like函数进行判断。

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]...等是同一表达。

Answer 2

可以使用Instr函数来判断变量是否包含特定字符串。语法如下：Instr([start, ]string1, string2[, compare])其中，start是可选的起始位置参数，一般省略即可。string1是待查找的字符串，可以是变量或字符串常量。string2是要查找的子字符串。compare是可选的比较参数，表示比较方式，可以取值为0（vbBinaryCompare）或1（vbTextCompare），一般选用vbTextCompare，表示不区分大小写比较。如果string1中包含string2，则返回起始位置，否则返回0。举个例子，判断变量str是否包含字符串\"hello\"，可以使用如下代码：If Instr(str, \"hello\", vbTextCompare) \u003e 0 Then '包含\"hello\"字符串Else '不包含\"hello\"字符串End If

Answer 3

可以使用InStr函数来判断变量中是否包含特定字符串。InStr函数返回子字符串在指定字符串中的开始位置，若未找到则返回0。可以利用这个特性来判断变量中是否存在特定字符串，例如：```Dim myString As StringmyString = \"Hello World\"If InStr(myString, \"World\") \u003e 0 Then MsgBox \"myString contains \"\"World\"\"\"Else MsgBox \"myString does not contain \"\"World\"\"\"End If```以上代码判断变量myString中是否包含字符串\"World\"，如果包含则弹出消息框\"myString contains \"World\"\"，否则弹出消息框\"myString does not contain \"World\"\"。