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