在VB中，可以使用InStr函数来判断一个字符串中是否包含某个字符或子字符串。以下是一些示例：

判断字符串中是否包含某个字符

Dim myString As String

myString = "Hello, world!"

If InStr(myString, "o") > 0 Then

    ' myString中包含字符"o"

End If

在这个示例中，我们首先定义了一个名为myString的字符串，并将其设置为“Hello, world!”。然后，我们使用InStr函数检查该字符串中是否包含字符“o”。如果返回值大于0，则表示该字符串中包含“o”。

判断字符串中是否包含某个子字符串

Dim myString As String

myString = "Hello, world!"

If InStr(myString, "world") > 0 Then

    ' myString中包含子字符串"world"

End If

在这个示例中，我们使用InStr函数检查myString中是否包含子字符串“world”。

请注意，InStr函数返回被查找字符串的起始位置，如果未找到则返回0。如果您只需要判断字符串中是否存在某个字符或子字符串，而不关心位置，也可以将返回值与0进行比较。

例如：

Dim myString As String

myString = "Hello, world!"

If InStr(myString, "l") <> 0 Then

    ' myString中包含字符"l"

End If

在这个示例中，我们使用<>运算符来检查字符串中是否包含字符“l”。如果返回值不等于0，则表示该字符串中包含“l”。