[VB] Block Pop-up with Tab Browser

 Dim Browser As New WebBrowser     
   TabControl1.TabPages.Add("New Page")
        TabControl1.SelectTab(inte)
        Browser.Name = "Web Browser"
        Browser.Dock = DockStyle.Fill
        TabControl1.SelectedTab.Controls.Add(Browser)
        AddHandler Browser.DocumentCompleted, AddressOf Done
        inte = inte + 1
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).Navigate("")
        CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser).ScriptErrorsSuppressed = True