Me.ToolStripTextBox1.AutoCompleteMode = AutoCompleteMode.Suggest
 Me.ToolStripTextBox1.AutoCompleteSource = AutoCompleteSource.AllUrl
 WebBrowser1.Navigate("www.google.com")

 WebBrowser1.GoBack()

 WebBrowser1.GoForward()

 WebBrowser1.Stop()

WebBrowser1.Refresh()

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

WebBrowser1.ShowSaveAsDialog()[/

WebBrowser1.Navigate("http://www.google.co.uk/search?hl=ar&q=" & ToolStripTextBox2.Text)

 Private Sub srchbox_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles srchbox.KeyDown
 If e.KeyCode = Keys.Enter Then
 WebBrowser1.Navigate("http://www.google.co.uk/search?hl=ar&q=" & ToolStripTextBox2.Text)
 End If
 End Sub

 Private Sub ToolStripTextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ToolStripTextBox1.KeyDown
 If e.KeyCode = Keys.Enter Then
 WebBrowser1.Navigate(ToolStripTextBox1.Text)
 End If
 End Sub

 Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
 Try
 ToolStripProgressBar1.Maximum = e.MaximumProgress
 ToolStripProgressBar1.Value = e.CurrentProgress
 Catch ex As Exception
 End Try
 End Sub

 Private Sub WebBrowser1_********Completed(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowser********CompletedEventArgs) Handles WebBrowser1.********Completed
 'to update the address box whenever a page is access. 
 If e.Url.IsAbsoluteUri Then
 ToolStripTextBox1.Text = e.Url.AbsoluteUri
 Else
 ToolStripTextBox1.Text = e.Url.ToString()
 End If
 Me.Text = " Eyad Browser - " & WebBrowser1.********Title
 End Sub

 WebBrowser1.********.ExecCommand("copy", True, DBNull.Value)

 WebBrowser1.********.ExecCommand("cut", True, DBNull.Value)

 WebBrowser1.********.ExecCommand("paste", True, DBNull.Value)

 WebBrowser1.ShowPageSetupDialog()

 WebBrowser1.ShowPrintPreviewDialog()

 WebBrowser1.Print()

 WebBrowser1.ShowPropertiesDialog()

 WebBrowser1.Navigate("رابط الموقع")
 Me.Text = " Eyad Browser - " & "أسم الموقع"
 ToolStripTextBox1.Text = "رابط الموقع"