Imports System.IO
Imports System.Net
Imports System.Text
public class MainClass
Shared Sub Main()
Dim uri As New Uri("http://www.rntsoft.com/index.htm")
Console.WriteLine("AbsolutePath: " & uri.AbsolutePath )
Console.WriteLine("AbsoluteUri: " & uri.AbsoluteUri )
Console.WriteLine("Host: " & uri.Host )
Console.WriteLine("HostNameType: " & uri.HostNameType.ToString())
End Sub
End Class