VB 运行时错误'-2147467259(80004005)': 方法'Navigate'作用于对象'IWebBrowser2'时失败

问题遇到的现象和发生背景

https://bbs.csdn.net/topics/391975340 跟多年前这个帖子的问题很相似。只不过我用的是原来的webbrowser

问题相关代码，请勿粘贴截图

运行结果及报错内容

需求是在PPT中播放时可以展示上网页面。使用microsoft web browser 控件。打开ppt后第一次播放时可以使用（但根据不同网站页面，会弹出很多错误警告对话框，例如某js文件。估计是浏览器内核不支持（默认的是ie?）如图1）。

图1
而且退出播放后再次播放时就报错（图2）

图2
VB 运行时错误'-2147467259(80004005)':
方法'Navigate'作用于对象'IWebBrowser2'时失败

我的解答思路和尝试过的方法

我想要达到的结果

设置下注册表看看。
新建一个记事本，把下面代码复制进去：

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION]
"POWERPNT.EXE"=dword:00002edf

保存下，然后将后缀名.txt改成.reg，双击运行或者以管理员身份运行。 这个代码的作用是让指定的exe程序使用ie11模式。