Linq to xml 和跨多个投影的计数器

Question

与此问题类似：

LINQ，迭代器，选择和投影

我想使用投影中的计数器或递增变量 - 但是我想在多个投影中使用相同的计数器。我正在使用基于不同数据源的多个投影构建一个 xml 文档，但需要维护一个“id”节点（其中 id 是一个递增值）。

我可以使用类似于

Dim x as New XElement("rootNode", list.Select(Of XElement)(Function(xe, count) new XElement("blah", count+1)) 的 方法在一个投影中实现此目的)

然后，我想将另一组 XElement 添加到根，继续前一个值的计数器编辑

---

： 注意 - 上面的内容可能没有很好地描述我的问题 - 我想询问一个 xml 文档（由上面的列表表示）并基于一组节点，向另一个文档添加一些新节点。然后询问文档中的另一组节点，并向另一个文档添加更多新节点，同时维护两组节点的递增计数器。

即

Dim orig = <root>
                       <itemtype1>
                           <item>
                               <name>test</name>
                               <age>12</age>
                           </item>
                           <item>
                               <name>test2</name>
                               <age>13</age>
                           </item>
                       </itemtype1>
                       <itemtype2>
                           <item>
                               <name>testing</name>
                               <age>15</age>
                           </item>
                           <item>
                               <name>testing</name>
                               <age>14</age>
                           </item>
                       </itemtype2>
                   </root>

    Dim newX As New XElement("test", orig.Descendants("itemtype1"). _
                             Descendants("item").Select(Of XElement)(Function(xe, count) New XElement("blah", New XElement("id", count))), _
                                                        orig.Descendants("itemtype2"). _
                             Descendants("item").Select(Of XElement)(Function(xe, count) New XElement("blah", New XElement("id", count))))

理想情况下这会输出：

 <test>
  <blah>
    <id>0</id>
  </blah>
  <blah>
    <id>1</id>
  </blah>
  <blah>
    <id>2</id>
  </blah>
  <blah>
    <id>3</id>
  </blah>
</test>

Answer 1

最简单的可能是连接你的两个序列：（

Dim x as New XElement("rootNode", list.Concat(list2) _
                                      .Select(Of XElement)(Function(xe, count) _
                                          New XElement(xe, count + 1)) _
                     )

格式化以提高可读性.)