如何检索WebBrowser控件里的网页的文本内容?
如题
不知道怎么做。。
[解决办法]
Public Class Form1
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Me.WebBrowser1.Navigate( "www.baidu.com ")
End Sub
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
' 获得WebBrowser1内页面的HTML代码
Dim strHTML As String = Me.WebBrowser1.Document.GetElementsByTagName( "html ").Item(0).OuterHtml
Dim i As Int32 = InStr(strHTML, "百度 ")
MsgBox(i)
End Sub
End Class