使用 VB.net 从 xml 文件中获取值

Question

我需要将所有<symbol>值从 xml 文件中获取到数组中。 最简单的方法是什么？

<?xml version="1.0" encoding="UTF-8"?>
<RadanProject xmlns="http://www.radan.com/ns/project">
  <ProjectNestNameTemplate>*</ProjectNestNameTemplate>
  <JobName>teszt2222</JobName>
  <FirstNestNumber>1</FirstNestNumber>
  <Parts>
    <NextID>3</NextID>
    <Part
      <ID>1</ID>
      <Symbol>C:\Users\VEREST\Desktop\ide2\kor100.sym</Symbol>
      <Kit>-</Kit>
    </Part>
    <Part>
      <ID>2</ID>
      <Symbol>C:\Users\VEREST\Desktop\ide2\korteszt.sym</Symbol>
      <Kit>-</Kit>
    </Part>
  </Parts>
  <Sheets>
    <NextID>1</NextID>
  </Sheets>
</RadanProject>

最好的问候，蒂比

Answer 1

使用 Xml Linq。 我创建了一个包含 ID 和符号的字典。

Imports System.Xml
Imports System.Xml.Linq
Module Module1
    Dim FILENAME As String = "c:\temp\test.xml"
    Sub Main()
        Dim doc As XDocument = XDocument.Load(FILENAME)
        Dim ns As XNamespace = doc.Root.GetDefaultNamespace

        Dim dict = doc.Descendants(ns + "Part") _
                   .GroupBy(Function(x) CType(x.Element(ns + "ID"), String), Function(y) CType(y.Element(ns + "Symbol"), String)) _
                   .ToDictionary(Function(x) x.Key, Function(y) y.FirstOrDefault())


    End Sub

End Module