Encontrar encontrar links de sites com o regular expression.

Question

Oi boa tarde, estou com uma dúvida relativo à como escrever o codigo do regular expression no vb 2010, aqui está um exemplo:

Dim strMail As String = "[a-z0-9-\.]*@[a-z]*\.[a-z]{2,4}"
            Dim reg As New System.Text.RegularExpressions.Regex(strMail)
            Dim matches As System.Text.RegularExpressions.MatchCollection
            matches = reg.Matches(RichTextBox1.Text)
            If matches.Count > 0 Then
                For Each m As System.Text.RegularExpressions.Match In matches
                    If ListBox1.Items.Contains(m.Value) Then
                    Else
                        RichTextBox2.Text = RichTextBox2.Text & m.Value & ";"
                        ListBox1.Items.Add(m.Value)
                        Form5.ListBox3.Items.Add(m.Value)
                    End If
                Next
            End If

Neste caso funciona perfeitamente para encontrar emails nos sites em que pesquiso, porém como eu faço para encontrar links no sites?