VB WebBrowser控件如何显示指定代码?
如何将“指定html源码”显示在WebBrowser控件中,注意显示的不是代码本身!例:我想将“百度的代码”http://www.baidu.com/search/fre...
如何将“指定html源码”显示在WebBrowser控件中,注意显示的不是代码本身!
例:我想将“百度的代码”http://www.baidu.com/search/freecode.html放在VB程序中,如果是HTML文件那好办,只要复制进去就可以了,但WebBrowser控件,我就不知道怎么用了。 展开
例:我想将“百度的代码”http://www.baidu.com/search/freecode.html放在VB程序中,如果是HTML文件那好办,只要复制进去就可以了,但WebBrowser控件,我就不知道怎么用了。 展开
1个回答
展开全部
照着下面代码修改吧
WebBrowser1.Navigate "about:blank"
Do While (WebBrowser1.Busy = True)
DoEvents
Loop
WebBrowser1.Document.Open
WebBrowser1.Document.writeln "<HTML>"
WebBrowser1.Document.writeln "<HEAD>"
WebBrowser1.Document.writeln "<TITLE>"
WebBrowser1.Document.writeln "</TITLE>"
WebBrowser1.Document.writeln "</HEAD>"
WebBrowser1.Document.writeln "<BODY>"
WebBrowser1.Document.writeln "<a href=" & VBA.Chr(34) & "http://510122.com" & VBA.Chr(34) & ">双流网</a>"
WebBrowser1.Document.writeln "</BODY>"
WebBrowser1.Document.writeln "</HTML>"
WebBrowser1.Document.Close
WebBrowser1.Navigate "about:blank"
Do While (WebBrowser1.Busy = True)
DoEvents
Loop
WebBrowser1.Document.Open
WebBrowser1.Document.writeln "<HTML>"
WebBrowser1.Document.writeln "<HEAD>"
WebBrowser1.Document.writeln "<TITLE>"
WebBrowser1.Document.writeln "</TITLE>"
WebBrowser1.Document.writeln "</HEAD>"
WebBrowser1.Document.writeln "<BODY>"
WebBrowser1.Document.writeln "<a href=" & VBA.Chr(34) & "http://510122.com" & VBA.Chr(34) & ">双流网</a>"
WebBrowser1.Document.writeln "</BODY>"
WebBrowser1.Document.writeln "</HTML>"
WebBrowser1.Document.Close
参考资料: 我的双流网 http://510122.COM
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询