不升级也可以用。引入Microsoft.Web.WebView2.Core.dll 及Microsoft.Web.WebView2.WinForms.dll。代码如下:
Dim view As new Microsoft.Web.WebView2.WinForms.WebView2()
view.name = "WebView2"
Dim pn As WinForm.Panel = e.Form.Controls("Panel_webview2")
pn.basecontrol.controls.add(view)
view.Dock = system.windows.forms.Dockstyle.fill
If view IsNot Nothing Then
' view.CoreWebView2.Settings.IsZoomControlEnabled = True '是否启用网页的放大缩小功能
view.source = new uri("https://www.baidu.com/")
'view.CoreWebView2.Settings.IsScriptEnabled = True ' 是否启用JS脚本
'view.CoreWebView2.Settings.IsWebMessageEnabled = True ' 是否启用WebMessage
'view.CoreWebView2.Settings.AreDefaultScriptDialogsEnabled = True ' 是否启用默认的对话框
'view.CoreWebView2.Settings.IsStatusBarEnabled = True '是否显示状态栏,关闭时鼠标悬浮在链接上时右下角没有url地址显示
'view.CoreWebView2.Settings.AreDevToolsEnabled = True ' 是否启用开发工具, 默认为true,关闭时菜单中的相应选项也一起关闭
'view.CoreWebView2.Settings.AreDefaultContextMenusEnabled = True '是否启用右键菜单
'view.CoreWebView2.Settings.AreHostObjectsAllowed = True '是否启用脚本的HostObject注入
' view.CoreWebView2.Settings.IsBuiltInErrorPageEnabled = True ' 是否启用默认的错误对话框
End If
[此贴子已经被作者于2023/8/17 16:26:33编辑过]