Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim address As String = "www.yourDomain.com"
Dim uriString As String = String.Format("{0}{1}{2}", Uri.UriSchemeHttp, Uri.SchemeDelimiter, address)
Dim result As Uri = New Uri(uriString)
If result.IsWellFormedOriginalString() = True Then
Console.WriteLine("{0} is a well formed Uri", uriString)
else
Console.WriteLine("{0} is not a well formed Uri", uriString)
End If
End Sub
End Class