Question

判断一个字符串是否包含另一个字符串的所有字符

Answer 1

InStr 函数返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。InStr([start, ]string1, string2[, compare])InStr 函数的语法具有下面的参数：start 可选参数。为数值表达式，设置每次搜索的起点。如果省略，将从第一个字符的位置开始。如果指定了 compare 参数，则一定要有 start 参数。string1 必要参数。接受搜索的字符串表达式。string2 必要参数。被搜索的字符串表达式。Compare可选参数。指定字符串比较。如果省略 compare，Option Compare 的设置将决定比较的类型。

例如如下

Sub tttt()

a = "abvsdf"

b = "z"

c = InStr(a, b)

If c > 0 Then

MsgBox "a包含b"

Else

MsgBox "a不包含b"

End If

End Sub

测试结果