 <p>When the page is done loading, intercept the links :</p> <pre><code>Dim olink As HtmlElement Dim olinks As HtmlElementCollection = WB1.Document.Links For Each olink In olinks olink.AttachEventHandler("onclick", AddressOf LinkClicked) Next </code></pre> <p>Then add a function :</p> <pre><code>Private Sub LinkClicked(ByVal sender As Object, ByVal e As EventArgs) If txtAddress.Enabled = True Then Dim link As HtmlElement = WB1.Document.ActiveElement Dim url As String = link.GetAttribute("href") MsgBox("Link Clicked: " &amp; link.InnerText &amp; vbCrLf &amp; "Destination: " &amp; url) WB1.Navigate(url, False) End If End Sub </code></pre>