Question

如何停止新标签在visual basic中自动打开google.com。我需要一个空白的网址文本框这是我的新标签代码

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

Answer 1

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

只需在下拉栏中创建一个按钮或项目，即＆＃34;设置主页＆＃34;

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

接下来创建一个名为Homepage的新表单，并通过双击按钮并将其链接到您在步骤1中创建的按钮

homepage.show()

在该按钮的代码中。

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

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

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

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

webbrowser1.navigate(my.settings.homePage)

这应该有效，至少对我的浏览器来说是

Answer 2

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

的内容

WebBrowser1.Navigate时（ “www.google.com”）

最有可能在您的form_load事件中。只需删除它。

WebBrowser Visual Basic

2 个答案: