Imports Module Module1 Sub Main() Dim aw As XNamespace = GetXmlNamespace() Console.WriteLine(aw) End SubEnd Module