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

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