Private Sub Form_Load() WebBrowser1.Navigate("www.vbforums.com") End Sub Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted 'you must add the "Microsoft HTML Object Library"!!!!!!!!! Dim HTMLdoc As HtmlDocument Dim HTMLlinks As HTMLAnchorElement Dim STRtxt As String ' List the links. On Error Resume Next HTMLdoc = WebBrowser1.Document For Each HTMLlinks In HTMLdoc.Links STRtxt = STRtxt & HTMLlinks.href & vbCrLf Next (HTMLlinks) TextBox1.Text = STRtxt End Sub