如下简单的代码,获取不到源码
Private Sub Command1_Click()
WebBrowser1.Navigate Text1.Text
End SubPrivate Sub Form_Load()WebBrowser1.Navigate "https://www.baidu.com/"End Sub
Private Sub Timer1_Timer() Text2.Text = WebBrowser1.Document.documentElement.innerHTMLEnd Sub
Private Sub Command1_Click()
WebBrowser1.Navigate Text1.Text
End SubPrivate Sub Form_Load()WebBrowser1.Navigate "https://www.baidu.com/"End Sub
Private Sub Timer1_Timer() Text2.Text = WebBrowser1.Document.documentElement.innerHTMLEnd Sub
解决方案 »
- 使用Data控件访问SQL Server数据库
- 一个严重的声音API问题急待高手解决
- 关于简单的数据表单打印
- 日期问题
- 局域网内有两台机子,怎样才能让其中一台机子数据传到另一台机子上,并另一台机子能读取这些数据来做运算。
- richtextbox显示rtf文件的问题
- 怎样才能不让窗体被改变大小 同时保留最大化最小化按钮呢
- 谁知道什么是程序测试
- 大家好,我是个初学者,请留下您的qq我想跟您交流一下关于ADO的问题(急~~~在线等)
- 请问VB中如何实现诸如游戏中常见的随着鼠标移动,场景也随着移动的功能?
- 求助VB中读取TXT文件中的大量数据
- vba 表达式在上下文中未定义?未报错,菜鸟不懂,求大神指教
你的TextBox的MultiLine属性没有开启吧!
要在设计时的属性窗口中,把MultiLine属性设置为 True 。
另外,也把 ScrollBars 属性设置为3(Both :具有水平、垂直滚动条)。还有就是你应该在 WebBrowser1_DocumentComplete( )事件中去取数据,不是用Timer控件来处理。
其次确认你的Timer控件已经启动了(在Timer()事件内加断点看是否中断);
最后临时关闭杀毒/防火墙软件再试试。