Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser1.GoBack()
TextBox1.Text = WebBrowser1.Url.ToString()
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
WebBrowser1.Refresh()
TextBox1.Text = WebBrowser1.Url.ToString()
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
WebBrowser1.[Stop]()
TextBox1.Text = WebBrowser1.Url.ToString()
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
WebBrowser1.GoForward()
TextBox1.Text = WebBrowser1.Url.ToString()
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
WebBrowser1.Navigate(TextBox1.Text)
End Sub
End Class
