Question

VB webbrowser查找指定文字

建立一个，TEXT1，指定内容是“百度”
和一个TEXT2
比如webbrowser打开，百度网站。
这时候检测打开的页面，是否有“百度”这2个字，如果有的话，则在TEXT2显示：找到了
要是没有，则显示，没找到！

Answer 1

Private Sub Command1_Click()
If Not WebBrowser1.Busy Then
If InStr(WebBrowser1.Document.documentelement.innerText, Text1.Text) Then
Text2.Text = "找到了"
Else
Text2.Text = "未找到"
End If
End If
End Sub