如何在VBA中使用多个条件

Question

在以下代码中，我试图在打开的Word文档中查找文本框。找到该文本框后，我还要检查以确保其中包含正确的文本。这是无效的代码，我不知道为什么。

Dim i as Integer

for i = 1 to Application.ActiveDocument.Shapes.Count
    if Application.ActiveDocument.Shapes(i).Name = "Text Box 2" and _
    instr(Application.ActiveDocument.Shapes(i).TextFrame.TextRange.Text, "[Grab your reader") then
            ` Execute
    end if
next i

现在，如果我将和替换为另一个 if 语句，它将起作用。

Dim i as Integer

for i = 1 to Application.ActiveDocument.Shapes.Count
    if Application.ActiveDocument.Shapes(i).Name = "Text Box 2" then
        if instr(Application.ActiveDocument.Shapes(i).TextFrame.TextRange.Text, "[Grab your reader") then
            ` Execute
        end if
    end if
next i

据我了解，和应该与添加新的if语句完全相同。如果有人能告诉我为什么会这样，那太好了。