XElement.WriteTo writes this element to an XmlWriter.
Imports System
Imports System.IO
Imports System.Text
Imports System.Xml
Imports System.Xml.XPath
Public Class MainClass
Public Shared Sub Main()
Dim sb As StringBuilder = New StringBuilder()
Dim xws As XmlWriterSettings = New XmlWriterSettings()
xws.OmitXmlDeclaration = True
xws.Indent = True
Using xw = XmlWriter.Create(sb, xws)
xw.WriteStartElement("Root")
Dim child1 As XElement = _
<Child>
<GrandChild>some content</GrandChild>
</Child>
child1.WriteTo(xw)
Dim child2 As XElement = _
<AnotherChild>
<GrandChild>different content</GrandChild>
</AnotherChild>
child2.WriteTo(xw)
xw.WriteEndElement()
End Using
Console.WriteLine(sb.ToString())
End Sub
End Class
Related examples in the same category