在VB中，可以使用InStr函數來判斷一個字符串是否包含另一個字符串。InStr函數返回一個整數值，表示要搜索的字符串在被搜索的字符串中第一次出現的位置。
以下是一個示例代碼，演示如何使用InStr函數判斷一個字符串是否包含另一個字符串：
Dim mainString As String
Dim subString As String
mainString = "Hello, world!"
subString = "world"
If InStr(mainString, subString) > 0 Then
MsgBox("mainString包含subString")
Else
MsgBox("mainString不包含subString")
End If
在上面的代碼中，我們將要搜索的字符串賦值給mainString變量，將要判斷是否包含的字符串賦值給subString變量。然后，使用InStr函數來判斷subString是否存在于mainString中。如果InStr函數的返回值大于0，則表示mainString中包含subString，否則不包含。
根據實際情況，你可以替換mainString和subString的值來進行測試。
