UC知道vb如何强制网页只在WebBrowser中显示
来源：百度知道 编辑：UC知道 时间：2024/06/14 07:21:57
很多链接都需要新窗口打开，有什么办法让新窗口也只在WebBrowser中显示，而不另弹出IE呢？？？
谢谢！！！
谢谢！！！
呵呵，正好遇上。给我加点分哦！
Dim WithEvents Web_V1 As SHDocVwCtl.WebBrowser_V1
Private Sub Form_Load()
Set Web_V1 = WebBrowser1.Object
WebBrowser1.Navigate2 "www.sina.com"
End Sub
Private Sub Web_V1_NewWindow(ByVal URL As String, _
ByVal Flags As Long, _
ByVal TargetFrameName As String, _
PostData As Variant, _
ByVal Headers As String, _
Processed As Boolean)
Processed = True
WebBrowser1.Navigate URL
End Sub
如果WebBrowser里的网页是你自己写的代码，可以把链接用target定义到窗口自身。
还有种办法是给每个LINK都编一个ID,在vb程序中用和Javascipt相似的方法去得到这些URL.再重新Navigate(URL)。
如果你这个控件里的网页是网络上的，感觉不好做。貌似WebBrowser只有禁止重定向URL的属性。