MS.ASP.NET

полезная функция замены ссылок в тексте на форматированную гиперссылку
работает как со ссылками вида http://www.wobla.ru, так и просто https://www.wobla.ru

на C#

public string fetchURL(string message)
{
string strPattern = @"(?http://(?:[\w-]+\.)+[\w-]+(?:/[\w-./?%&~=]*[^.])?)";
string strReplace = "${url}";
string strInput = message;
string strResult;
strResult = Regex.Replace(strInput, strPattern, strReplace);
strPattern = @"(?http://)(?www\.(?:[\w-]+\.)+[\w-]+(?:/[\w-./?%&~=]*[^.])?)";
strReplace = "http://${url}\" target=_blank>${url}";
strResult = Regex.Replace(strResult, strPattern, strReplace);
return strResult;
}

и она же на VB.NET

Public Function fetchURL(ByVal message As String) As String
Dim strPattern As String = "(?http://(?:[\w-]+\.)+[\w-]+(?:/[\w-./?%&~=]*[^.])?)"
Dim strReplace As String = "${url}"
Dim strInput As String = message
Dim strResult As String
strResult = Regex.Replace(strInput, strPattern, strReplace)
strPattern = "(?http://)(?www\.(?:[\w-]+\.)+[\w-]+(?:/[\w-./?%&~=]*[^.])?)"
strReplace = "http://${url}"" target=_blank>${url}"
strResult = Regex.Replace(strResult, strPattern, strReplace)
Return strResult
End Function