Tool lauft im Debugmodus auch bei mir. Keine Ahnung, wieso ned im Release.
Hier noch n paar Tips:
Anstatt:
Code
If .Value = "power" Then
PS.Text = .ReadString
End If
If .Value = "speed" Then
Geschwindigkeit.Text = .ReadString
End If
If .Value = "weight" Then
Gewicht.Text = .ReadString
End If
If .Value = "designed" Then
Ab.Text = .ReadString
End If
If .Value = "obsolete" Then
Bis.Text = .ReadString
End If
If .Value = "reliability" Then
Zuverlässigkeit.Text = .ReadString
End If
Benutze das:
Code
Select Case .Value
Case "power"
...
Case "speed"
...
...
End SelectAchja, und mit dem XmlDocument anstatt XmlReader kannst du direkt auf untergeordnete XML-Elemente zugreifen:
Code
Dim xdc As New XMLDocument
xdc.Load("Pfad zur XML")
Dim xel As New XMLElement = xdc.Item("XML-Child vom Root").Item("XML-Child von Child von Root")
etc...Im Unterschied zum XmlReader arbeitet das XmlDocument nicht Sequenziell. Du kannst also ohne durchzulaufen die Child-Elemente abrufen.
