Imports System
Imports System.Text
Imports System.Xml
Imports System.Xml.XPath
Public Class MainClass
Public Shared Sub Main()
Dim xmlTree As XElement = _
This is some text
where
text.
This is a test.
Dim str As String = (From el In xmlTree.... Select CStr(el) ) _
.Aggregate(New StringBuilder(), _
Function(ByVal sb, ByVal i) sb.Append(i), _
Function(ByVal sb) sb.ToString())
Console.WriteLine(str)
End Sub
End Class