如下簡單的代碼,獲取不到原始碼
Private Sub Command1_Click()
WebBrowser1.Navigate Text1.Text
End Sub
Private Sub Form_Load()
WebBrowser1.Navigate "https://www.baidu.com/"
End Sub
Private Sub Timer1_Timer()
Text2.Text = WebBrowser1.Document.documentElement.innerHTML
End Sub
uj5u.com熱心網友回復:
不是“取不到”,只是你沒看見吧?你的TextBox的MultiLine屬性沒有開啟吧!
要在設計時的屬性視窗中,把MultiLine屬性設定為 True 。
另外,也把 ScrollBars 屬性設定為3(Both :具有水平、垂直滾動條)。
還有就是你應該在 WebBrowser1_DocumentComplete( )事件中去取資料,不是用Timer控制元件來處理。
uj5u.com熱心網友回復:
首先確認用IE能夠打開對應的網址;其次確認你的Timer控制元件已經啟動了(在Timer()事件內加斷點看是否中斷);
最后臨時關閉殺毒/防火墻軟體再試試。
uj5u.com熱心網友回復:
現在 baidu.com 打不開,聯通的網路。uj5u.com熱心網友回復:
你家安裝的一定是假寬帶轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/62439.html
標籤:控件
