sono arrivo al punto di fare così:
	codice:
	Private Sub web_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wbsearcut.DocumentCompleted
        Dim tag As HtmlDocument
        Dim tag_s As String   
        tag_s = tag.Links.ToString
        If (MouseButtons = Windows.Forms.MouseButtons.Left) And (Text = tag_s) Then
            web.Navigate(tag_s)
        End If
    End Sub
 
però Text=tag_s non so come farlo cioè devo fare quando clicco su un link potrei fare quando la posizione del mouse e come quella del link ma non riesco a capire come fare