主题：关于WebBrowser显示网页不是在窗口内

判断一下链接字符串，如果有文件扩展名，比如.xls之类的，就不要控制

全局代码

 

Public Sub web_DocumentCompleted(sender As object, e As windows.forms.WebBrowserDocumentCompletedEventArgs)
    For Each archor As object In sender.Document.Links

if archor .GetAttribute("href") like "*.xls*" then continue for
        archor.SetAttribute("target", "_self")
    Next
End Sub

 

Public Sub web_NewWindow(sender As object, e As system.ComponentModel.CancelEventArgs)

Dim urlNew As String = sender.Document.ActiveElement.GetAttribute("href")

if urlNew like "*.xls*" then return
    e.cancel = True
End Sub