WebBrowser.DocumentText赋值不起作用的替代解决办法

Dim wb As New WebBrowser()
'屏蔽脚本错误消息。
wb.ScriptErrorsSuppressed = True
wb.Navigate("about:blank")
wb.Document.Write(htmlString)