Problem mit dem Auslesen einer XML-Datei...

  • VB.NET

    Problem mit dem Auslesen einer XML-Datei...

    Ich habe eine XML-Datei, die wie folgt aussieht:

    XML-Quellcode

    1. <?xml version="1.0" encoding="utf-8"?>
    2. <AAA>
    3. <BBB>
    4. <CCC>111</CCC>
    5. <DDD>222</DDD>
    6. </BBB>
    7. </AAA>


    Jetzt möchte ich die XML natürlich wieder einlesen, so dass CCC bzw. DDD in eine Textbox geschrieben werden. Nur wie rufe ich die entsprechenden Werte ab, es sind ja keine Attribute sondern Texte? Mein Lösungsansatz war, dass ich mit Hilfe von Select Case das entsprechende Control temporär hinterlege und anschliessend dort den Wert einfüge. Welche Möglichkeit gibt es noch, um an die Werte zu kommen? Kann mir jemand einen Tipp geben?

    VB.NET-Quellcode

    1. Dim XMLReader As Xml.XmlReader = New Xml.XmlTextReader(file)
    2. With XMLReader
    3. Do While .Read
    4. Select Case .NodeType
    5. Case Xml.XmlNodeType.Element
    6. Select Case True
    7. Case .Name = "CCC"
    8. 'Aktion wenn CCC
    9. Case .Name = "DDD"
    10. 'Aktion wenn DDD
    11. End Select
    12. Case Xml.XmlNodeType.Text
    13. 'Hier sollte nachher der entsprechende Wert verarbeitet werden
    14. End Select
    15. Loop
    16. .Close()
    17. End With