Imports System.IO Imports System.Net Imports System.Text public class MainClass Shared Sub Main() Dim baseUri As New Uri("http://www.yourdomain.com:8080/") Dim myUri As New Uri(baseUri,"shownew.htm?date=today") Console.WriteLine(myUri.Host) End Sub End Class