Imports System
Imports System.Reflection
Imports System.Xml
Module Module1
Sub Main()
Dim doc As String = "" & _
"" & _
"" & _
"1 " & _
"A " & _
"B " & _
"1 " & _
" " & _
" "
Dim xml As XElement = XElement.Parse(doc)
Console.WriteLine(xml)
End Sub
End Module