AccessTr.neT

Lazım olanlar

1 TextBox
1 RichTextbox
1 Web Browser
2 Button

Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       WebBrowser1.Navigate(TextBox1.Text)

   End Sub



   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

       RichTextBox1.Text = WebBrowser1.DocumentText

   End Sub

End Class