Help with tabs in web browser

[Laxitive]

I am making a web browser but could someone please explain to me how to add tabs to it please

[Pixie]

I am making a web browser but could someone please explain to me how to add tabs to it please

Add a tab control
Then click "edit tab pages" in the properties window

[Laxitive]

I don't get wat I am supposed to do after I add tab control and another question. I have more than 1 form and when I exit out of say like form 2 the text I entered into a textbox doesn't save. How do i make it so when i exit it saves?

[Iamazn1]

Add tab control
Then, add 1 webbrowser for each tab you have. After that, just add a textbox+button

Webbrowser1/2/3/4/5/6.Navigate(TextBox1.Text)

[trevor206]

if you go on youtube some guy as a very good tut on this his name is like environmentalnerd or something but go find that.

[stevethehacker]

He has a cool channel

[Laxitive]

if you go on youtube some guy as a very good tut on this his name is like environmentalnerd or something but go find that.

thx a lot but do you have an answer to my second question?

[trevor206]

thx a lot but do you have an answer to my second question?

its all in the video it here watch it

[YOUTUBE]https://www.youtube.com/watch?v=Gd5xh_HF7EE[/YOUTUBE]

just make everything he does in the vid then just copy paste the code.

Public Class Form1
Dim int As Integer = 0

Private Sub Loading(ByVal sender As Object, ByVal e As Windows.Forms.WebBrowserProgressChangedE ventArgs)
ToolStripProgressBar1.Maximum = e.MaximumProgress
ToolStripProgressBar1.Value = e.CurrentProgress
End Sub

Private Sub Done(ByVal sender As Object, ByVal e As Windows.Forms.WebBrowserDocumentComplete dEventArgs)
TabControl1.SelectedTab.Text = CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).DocumentTitle
ComboBox1.Text = CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).Url.ToString
End Sub

Form1_Load:
Dim Browser As New WebBrowser
TabControl1.TabPages.Add("New Page")
Browser.Name = "Web Browser"
Browser.Dock = DockStyle.Fill
TabControl1.SelectedTab.Controls.Add(Bro wser)
AddHandler Browser.ProgressChanged, AddressOf Loading
AddHandler Browser.DocumentCompleted, AddressOf Done
int = int + 1
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).GoHome()

Add Tab:
Dim Browser As New WebBrowser
TabControl1.TabPages.Add("New Page")
TabControl1.SelectTab(int)
Browser.Name = "Web Browser"
Browser.Dock = DockStyle.Fill
TabControl1.SelectedTab.Controls.Add(Bro wser)
AddHandler Browser.ProgressChanged, AddressOf Loading
AddHandler Browser.DocumentCompleted, AddressOf Done
int = int + 1
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).GoHome()

Remove Tab:
If Not TabControl1.TabPages.Count = 1 Then
TabControl1.TabPages.RemoveAt(TabControl 1.SelectedIndex)
TabControl1.SelectTab(TabControl1.TabPag es.Count - 1)
int = int - 1
End If

Website Properties:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).ShowPropertiesDialog

Back:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).GoBack()

Forward:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).GoForward()

Refresh:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).Refresh()

Stop:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).Stop()

Home:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).GoHome()

Go:
CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).Navigate(ComboBox1.Text)

Timer1:
ToolStripStatusLabel1.Text = CType(TabControl1.SelectedTab.Controls.I tem(0), WebBrowser).StatusText

[Pixie]

if you go on youtube some guy as a very good tut on this his name is like environmentalnerd or something but go find that.

Yeah, if only he was on MPGH...