网页浏览器 Visual Basic

WebBrowser Visual Basic

如何阻止在 Visual Basic 中自动打开新标签页 google.com。我需要一个空白 url 文本框 这是我的新标签代码

Private Sub AddTabToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AddTabToolStripMenuItem.Click
    Dim tab As New TabPage
    Dim newtab As New tab
    newtab.Show()
    newtab.TopLevel = False
    newtab.Dock = DockStyle.Fill
    tab.Controls.Add(newtab)
    Form1.TabControl1.TabPages.Add(tab)
    Form1.TabControl1.SelectedTab = tab

这是表单加载时的代码

Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Dim t As New TabPage
    Dim newtab As New tab
    newtab.Show()
    newtab.TopLevel = False
    newtab.Dock = DockStyle.Fill
    t.Controls.Add(newtab)
    TabControl1.TabPages.Add(t)

End Sub

在您实际将其设置为打开页面之前,它不会打开页面。在您的代码中的某处,您有类似于

的内容

webbrowser1.navigate("www.google.com")

很可能在您的 form_load 活动中。只需删除它。

如果您愿意,可以允许用户设置自己的主页。

只需创建一个按钮,或在下拉栏中创建一个显示 "Set Homepage"

的项目

为您的网络浏览器创建一个名为 homePage 的新设置,将其设置为字符串。别无他法。

接下来创建一个名为 Homepage 的新表单,然后 link 通过双击您在第一步中创建的按钮并将其放入

homepage.show() 

在该按钮的代码中。

在您创建的另一个表单上,您需要一个文本框和一个保存按钮。

双击按钮并将此代码放入按钮的代码块中。

textbox1.text = my.settings.homePage
my.settings.save()

最后在您原来的浏览器表单上,在 form1_load 下放置这行代码

webbrowser1.navigate(my.settings.homePage)

应该可以,至少对我的浏览器有效