Uri.UserInfo
Imports System.Net Imports System.Net.Sockets Public Class Tester Public Shared Sub Main Dim URL As System.Uri URL = New System.Uri("http://www.java2s.com/index.htm?key=value") Console.WriteLine("AbsolutePath: " & URL.AbsolutePath) Console.WriteLine("AbsoluteUri: " & URL.AbsoluteUri) Console.WriteLine("Authority: " & URL.Authority) Console.WriteLine("Host: " & URL.Host) Console.WriteLine("Port: " & URL.Port) Console.WriteLine("LocalPath: " & URL.LocalPath) Console.WriteLine("IsDefaultPort: " & URL.IsDefaultPort) Console.WriteLine("IsFile: " & URL.IsFile) Console.WriteLine("PathAndQuery: " & URL.PathAndQuery) Console.WriteLine("Query: " & URL.Query) Console.WriteLine("Scheme: " & URL.Scheme) Console.WriteLine("UserEscaped: " & URL.UserEscaped) Console.WriteLine("UserInfo: " & URL.UserInfo) End Sub End Class