XMLの値取得について

質問

vb2005、XMLREADERを使用し以下の構造のXMLを読み込みました

---------------------------
<temperature>
<max>
<celsius>27</celsius>
<fahrenheit>80.6</fahrenheit>
</max>
<min>
<celsius>21</celsius>
<fahrenheit>69.8</fahrenheit>
</min>
</temperature>
----------------------------

"while reader.read"として 上から順番に読み込んでreader.localnameで分岐を入れることで最後には行き着くのですが、
上記の<temperature><max><celsius> の値を直接取り出す方法は
ありますでしょうか。

もしくはもっと要領の良い方法があれば教えてください

回答No.1

himajin100000 · ベストアンサー

Option Explicit On
Option Strict On
Option Compare Binary
Option Infer Off ' .NET 3.0以上のコンパイラ / VB 2008
Class Q4331055A
Shared Sub Main()

'XmlReaderはMustInheritなのでXmlTextReaderを使うんだろうが，
'どうやってファイルを読むか判らなかった。

'.NET 2.0のXmlTextReaderと違い
'XmlDocumentに2GBの制約があったような気がする(Q3153741)

Dim doc As System.Xml.XmlDocument
doc = New System.Xml.XmlDocument()
doc.Load("./Q4331055-1.xml")

'お解りとは思うがXPathに該当する複数のノードを取得したい場合はSelectNodesメソッド
'Valueプロパティの値はString型。
'インデントとかのSPACEも考慮してないからString.Trim(String)使うなり
'Integer.Parse(String)とかはお好みで。

System.Console.WriteLine(doc.SelectSingleNode("/temperature/max/celsius/text()").Value)

'キー入力待ちで止めているだけ。
System.Console.ReadKey(true)

'今回は使わなかったけどメモ
'http://support.microsoft.com/kb/308333/en-us
End Sub
End Class