XStreamingElement.WriteTo Method

Parameters

• writer
  Type: System.Xml.XmlWriter
  An XmlWriter into which this method will write.

Dim output As New StringBuilder
Dim srcTree As XElement = _
    <Root>
        <Child>1</Child>
        <Child>2</Child>
        <Child>3</Child>
        <Child>4</Child>
        <Child>5</Child>
    </Root>

Dim dstTree As XStreamingElement = _
    New XStreamingElement("NewRoot", _
        From el In srcTree.Elements() _
        Where el.Value = 3 _
        Select <DifferentChild><%= el.Value %></DifferentChild>)

Dim sb As StringBuilder = New StringBuilder()
Dim xws As XmlWriterSettings = New XmlWriterSettings()
xws.OmitXmlDeclaration = True
xws.Indent = True

Using xw As XmlWriter = XmlWriter.Create(sb, xws)
    dstTree.WriteTo(xw)
End Using
output.Append(sb.ToString())
output.Append(Environment.NewLine)

OutputTextBlock.Text = output.ToString()

StringBuilder output = new StringBuilder();
XElement srcTree = new XElement("Root",
                       new XElement("Child", 1),
                       new XElement("Child", 2),
                       new XElement("Child", 3),
                       new XElement("Child", 4),
                       new XElement("Child", 5)
                   );

XStreamingElement dstTree = new XStreamingElement("NewRoot",
                        from el in srcTree.Elements()
                        where (int)el == 3
                        select new XElement("DifferentChild", (int)el)
                    );

StringBuilder sb = new StringBuilder();
XmlWriterSettings xws = new XmlWriterSettings();
xws.OmitXmlDeclaration = true;
xws.Indent = true;

using (XmlWriter xw = XmlWriter.Create(sb, xws))
{
    dstTree.WriteTo(xw);
}
output.Append(sb.ToString() + Environment.NewLine);

OutputTextBlock.Text = output.ToString();