16,554
社区成员
发帖
与我相关
我的任务
分享
WebBrowser1.Url = New Uri(strName)
Private Sub complee()
While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Threading.Thread.Sleep(50)
End While
RichTextBox1.Text = WebBrowser1.Document.Body.InnerHtml
End Sub
Threading.Thread.Sleep(50)