Question

vba instr函数查找字符串的问题

Public Sub CommandButton1_Click()
Dim produ As String

produ = Sheet3.Range("A" & 9).Value
If InStr(produ, B是) > 0 Then MsgBox "1"
ends sub
无论Sheet3.Range("A" & 9).Value 是否含有"B是",都会弹出1,不知道是哪里出错了?

Answer 1

If InStr(produ, B是) > 0 Then
这个 “B是”必须方在双引号内，如下：
If InStr(produ, "B是") > 0 Then

Answer 2

B是没有加引号, 应为~b是~.