XML LINQ VB.Net

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