Imports Module Module1 Sub Main() Dim aw As XNamespace = GetXmlNamespace() Console.WriteLine("{0}", aw) End SubEnd Module