22-08-13, 06:02 PM
جرب هذه الطريقة
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim wb As New WebBrowser
wb.Dock = DockStyle.Fill
Dim tb As New TabPage
tb.Controls.Add(wb)
Me.TabControl1.TabPages.Add(tb)
Me.TabControl1.SelectedIndex = Me.TabControl1.TabPages.Count - 1
tb.Text = "Google"
wb.Navigate("http:\\www.google.com")
End Sub