vb.net 如何让webrowser中的window.open网页在新窗口打开而不是IE中打开
有个解决方法,但是只有是vb6中有效,我用的vb2008,提示错误1“RegisterAsBrowser”不是“System.Windows.Forms.WebBrows...
有个解决方法,但是只有是vb6中有效,我用的vb2008,提示
错误 1 “RegisterAsBrowser”不是“System.Windows.Forms.WebBrowser”的成员。
错误 2 “Object”不是“System.Windows.Forms.WebBrowser”的成员。
请问高人,该如何解决,高分在线等。
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Dim NFrm As New Form1
NFrm.WebBrowser1.RegisterAsBrowser = True
Set ppDisp = NFrm.WebBrowser1.Object
NFrm.Visible = True
End Sub 展开
错误 1 “RegisterAsBrowser”不是“System.Windows.Forms.WebBrowser”的成员。
错误 2 “Object”不是“System.Windows.Forms.WebBrowser”的成员。
请问高人,该如何解决,高分在线等。
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Dim NFrm As New Form1
NFrm.WebBrowser1.RegisterAsBrowser = True
Set ppDisp = NFrm.WebBrowser1.Object
NFrm.Visible = True
End Sub 展开
2个回答
展开全部
【首发答案】
在NewWindow事件中,
Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
Dim newUrl = WebBrowser1.StatusText
'Dim newUrl = WebBrowser1.Url.AbsoluteUri '是这个还是上面那个的我忘了..你都试试..
WebBrowser1.Navigate(newUrl) '加载新的网址
e.Cancel = True '使外部浏览器无法捕获此事件
End Sub
在NewWindow事件中,
Private Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
Dim newUrl = WebBrowser1.StatusText
'Dim newUrl = WebBrowser1.Url.AbsoluteUri '是这个还是上面那个的我忘了..你都试试..
WebBrowser1.Navigate(newUrl) '加载新的网址
e.Cancel = True '使外部浏览器无法捕获此事件
End Sub
微测检测5.10
2023-05-10 广告
2023-05-10 广告
您好!建议咨 深圳市微测检测有限公司,已建立起十余个专业实验室,企业通过微测检测就可以获得一站式的测试与认 证解决方案;(EMC、RF、MFi、BQB、QI、USB、安全、锂电池、快充、汽车电子EMC、汽车手机互 联、语音通话质量),认证遇...
点击进入详情页
本回答由微测检测5.10提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询