Private Sub Form_Load()
Me.WebBrowser1.Navigate2 "about:blank"
Do
DoEvents
Loop Until Me.WebBrowser1.ReadyState = READYSTATE_COMPLETE
WebBrowser1.Document.write "<body style='padding:0; margin:0;'><img src='https://www.baidu.com/img/baidu_jgylogo3.gif'></body>"
End Sub使用Webbrowser直接运行HTML代码
最新推荐文章于 2026-04-26 10:20:34 发布
本文介绍了一个使用VBA编程语言展示如何利用WebBrowser控件加载空白页面并在其上显示特定内容的示例。该示例通过编程方式设置WebBrowser控件的属性和事件,演示了如何在页面加载完成后写入自定义HTML内容。
5013

被折叠的 条评论
为什么被折叠?



