Make Web Browser in VB6 (tut)

This Web Browser will have: back, forward, refresh, search,  links

1. Open your VB6 and start standard exe

2. Press CTRL+T and search for "Microsoft Internet Tools"

3. There should be added some globe on the toolbar (stretch it on the form) make sure its big

3. Make 5 buttons and 1 textbox

Name---Caption

Text1---erase everything in textbox

CmdBack---Back

CmdForward---Forward

CmdRefresh---Refresh

CmdSearch---Search

CmdGmail---Gmail    you can change "gmail" into something else but later when i write "gmail" you will have to change it to another link.

4. Click on any button and add this code:

Private Sub CmdBack_Click()

WebBrowser1.GoBack

End Sub

Private Sub CmdForward_Click()

WebBrowser1.GoForward

End Sub

Private Sub CmdGmail_Click()

WebBrowser1.Navigate ("http://www.gmail.com")

End Sub

Private Sub CmdRefresh_Click()

WebBrowser1.Refresh

End Sub

Private Sub CmdSearch_Click()

WebBrowser1.Navigate (Text1.Text)

End Sub

Private Sub Form_Load()

WebBrowser1.Navigate ("http://www.google.com")

End Sub

Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)

Text1.Text = (WebBrowser1.LocationURL)

Form1.Caption = (WebBrowser1.LocationName)

End Sub

NOTE: Change Gmail link into something else if you want (see step 3)