WebBrowser.DocumentText赋值不起作用的替代解决办法。 Dim wb As New WebBrowser() '屏蔽脚本错误消息。 wb.ScriptErrorsSuppressed = True wb.Navigate("about:blank") wb.Document.Write(htmlString) ----------------------------------- http://www.cnblogs.com/rock_chen/