XMLｿｽｿｽﾇみ搾ｿｽｿｽﾞにゑｿｽ

ｿｽ@

ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO

ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++

ｿｽﾖ連ｿｽTｿｽCｿｽg

ｿｽEpapy's softwarelibrary

ｿｽｿｽｿｽｿｽ 2007/06/07(ｿｽｿｽ) 02:48:15

ｿｽﾂ具ｿｽｿｽｿｽVB.NET WindowsXP ProｿｽﾅゑｿｽｿｽB

XMLｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾌ抵ｿｽｿｽgｿｽｿｽｿｽｿｽｿｽﾌようｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽﾌゑｿｽﾇゑｿｽｿｽｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽ
<Items>
  <SampleClass>
    <Number>123</Number>
    <Message>ｿｽeｿｽXｿｽgｿｽﾅゑｿｽｿｽB</Message>
  </SampleClass>
</Items>

1ｿｽiｿｽｿｽｿｽｿｽｿｽﾌとゑｿｽｿｽﾍどぼゑｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽ‾ｿｽｿｽｿｽOｿｽｿｽｿｽ黷ｳｿｽｿｽﾌサｿｽｿｽｿｽvｿｽｿｽｿｽｿｽ
ｿｽかｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
http://dobon.net/vb/dotnet/file/xmlserializer.html

2ｿｽiｿｽKｿｽﾉ子ｿｽmｿｽ[ｿｽhｿｽｿｽｿｽﾅゑｿｽｿｽﾄゑｿｽﾆゑｿｽｿｽﾌ読み包ｿｽｿｽｿｽｿｽかｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/07(ｿｽｿｽ) 03:11:20

XMLｿｽｿｽﾇみ搾ｿｽｿｽﾞゑｿｽｿｽﾟのクｿｽｿｽｿｽXｿｽﾍゑｿｽｿｽｿｽｿｽ骭ｾｿｽｿｽｿｽﾄゑｿｽｿｽﾟでゑｿｽｿｽｿｽｿｽB
ｿｽ@ｿｽ@Public Class Items
        Public Class SampleClass
            Public Number As Integer
            Public Message As String
        End Class
    End Class

ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/07(ｿｽｿｽ) 23:42:19

        Dim doc As New XmlDocument
        Dim xmlPath = Me.MapPath("Test.xml")

        doc.Load(xmlPath)

        Dim NodeLists As XmlNodeList
        Dim Node As XmlNode

        NodeLists = doc.SelectNodes("//SampleClass[text()='SAmple'])
        For Each Node In NodeLists
    ｿｽ@ｿｽ@ｿｽ@ｿｽ@TextBox1.Text = TextBox1.Text & Node.InnerText
        Next

<Items>
  <SampleClass>Sample</SampleClass>
<TESTNODE>
    <Number>123</Number>
    <Message>ｿｽeｿｽXｿｽgｿｽﾅゑｿｽｿｽB</Message>
<TESTNODE>
  </SampleClass>
</Items>

ｿｽ¥ｿｽ[ｿｽXｿｽｿｽXMLｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽLｿｽﾉゑｿｽｿｽ驍ｱｿｽﾆゑｿｽSampleClassｿｽﾌ値SampleｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽ123ｿｽｿｽeｿｽXｿｽgｿｽﾅゑｿｽｿｽｿｽｿｽﾆゑｿｽﾜゑｿｽｿｽｿｽB
ｿｽqｿｽﾌ値ｿｽｿｽﾆゑｿｽｿｽｿｽ@ｿｽﾅヒｿｽｿｽｿｽgｿｽﾅゑｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/06/08(ｿｽｿｽ) 09:33:25

> ｿｽｿｽｿｽｿｽ123ｿｽｿｽeｿｽXｿｽgｿｽﾅゑｿｽｿｽｿｽｿｽﾆゑｿｽﾜゑｿｽｿｽｿｽB
XPath ｿｽｿｽｿｽﾍゑｿｽｿｽｿｽｿｽｿｽｿｽﾌようｿｽﾈので、SelectNodes ｿｽｿｽｿｽﾅ取得ｿｽｿｽｿｽｿｽﾆゑｿｽｿｽB
ｿｽｿｽｿｽ驍｢ｿｽﾍ、ｿｽｿｽｿｽｿｽｿｽ XMLNode ｿｽｿｽ謫ｾｿｽｿｽｿｽ驍ｱｿｽﾆまではでゑｿｽｿｽﾄゑｿｽｿｽｿｽ謔､ｿｽﾈので、
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ ChildNodes, NextSibling ｿｽｿｽｿｽXｿｽﾅ親ｿｽqｿｽZｿｽｿｽmｿｽ[ｿｽhｿｽｿｽHｿｽｿｽﾆゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 02:52:37

SelectNodesｿｽﾅ取得ｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽB
XPathｿｽｿｽｿｽｿｽﾌようｿｽﾉ擾ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
//SampleClass[text()=Sample]../TESTNODE
ｿｽﾜゑｿｽｿｽｿｽ()ｿｽﾅゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
(//SampleClass[text()=Sample])../TESTNODE
ｿｽﾆゑｿｽｿｽｿｽﾄみゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽAｿｽgｿｽ[ｿｽNｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽBｿｽﾆエｿｽｿｽｿｽ[ｿｽｿｽｿｽﾅてゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽB
XPathｿｽﾌ指ｿｽｿｽｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽ

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 11:02:39

XPathｿｽﾌ指ｿｽｿｽｿｽ//child::SampleClass[text()='Sample']/parent::*
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽｿｽparentｿｽﾅ親ｿｽmｿｽ[ｿｽhｿｽﾉゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ
//child::SampleClass[text()='Sample']/parent::*/Childｿｽﾆゑｿｽｿｽ驍ｱｿｽﾆゑｿｽ
ｿｽqｿｽｿｽｿｽｿｽｿｽｿｽ謔､ｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽ閧ｪｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 11:02:58

ｿｽｿｽｿｽｿｽﾌチｿｽFｿｽbｿｽNｿｽｿｽYｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/06/10(ｿｽｿｽ) 11:24:59

> ｿｽ¥ｿｽ[ｿｽXｿｽｿｽXMLｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽLｿｽﾉゑｿｽｿｽ驍ｱｿｽﾆゑｿｽ
VB ｿｽRｿｽ[ｿｽhｿｽｿｽ XML ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽ@ｿｽ癆ｽｿｽﾈので、ｿｽｿｽｿｽｿｽﾅは難ｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽpｿｽﾌコｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽﾎ、ｿｽｿｽｿｽﾌ趣ｿｽｿｽﾛのコｿｽ[ｿｽhｿｽｿｽｿｽｿｽﾌまま貼ｿｽｿｽtｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽB

> //SampleClass[text()=Sample]../TESTNODE
> (//SampleClass[text()=Sample])../TESTNODE
ｿｽqｿｽｿｽｿｽｿｽｿｽA"Sampleｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ"ｿｽﾅはなゑｿｽｿｽA"Sampleｿｽvｿｽfｿｽmｿｽ[ｿｽh" ｿｽﾌ指ｿｽｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽ
ｿｽPｿｽﾈゑｿｽｿｽLｿｽｿｽｿｽﾆ思ｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽﾉゑｿｽｿｽﾄゑｿｽAｿｽｿｽｿｽｿｽｿｽｿｽmｿｽ[ｿｽhｿｽeｿｽXｿｽgｿｽﾌ記ｿｽqｿｽｿｽｿｽsｿｽｿｽｿｽﾅゑｿｽｿｽB
(ｿｽｿｽｿｽﾊ指ｿｽｿｽﾍ論ｿｽOｿｽﾆゑｿｽｿｽﾄ…)

ｿｽﾜゑｿｽｿｽAｿｽｿｽｿｽｿｽｿｽﾌパｿｽXｿｽﾍ、ｿｽﾇのようｿｽﾈノｿｽ[ｿｽhｿｽｿｽ謫ｾｿｽｿｽｿｽｿｽﾚ的ｿｽﾅ擾ｿｽｿｽｿｽｿｽ黷ｽｿｽｿｽｿｽﾈのでゑｿｽｿｽ蛯､ｿｽｿｽ?

ｿｽRｿｽ[ｿｽhｿｽﾌ意図ｿｽｿｽｿｽかｿｽｿｽﾎ、ｿｽｿｽﾖコｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾉなゑｿｽ XML ｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽｿｽ
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽﾌで、ｿｽｿｽﾌ暦ｿｽｿｽｿｽｿｽｿｽｿｽﾉゑｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾌゑｿｽｿｽAｿｽ皷橸ｿｽA
ｿｽ@//SampleClass[text()='Sample']/../TESTNODE
ｿｽ@//TESTNODE[../SampleClass/text()='SampleClass']
ｿｽ@//TESTNODE[../SampleClass='SampleClass']
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽﾈゑｿｽﾎ包ｿｽｿｽ@ｿｽ癆ｽｿｽﾉはなゑｿｽﾜゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽﾌ意図ｿｽﾉゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽ驍ｩｿｽﾍ不ｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB

ｿｽﾅ。ｿｽｿｽ{ｿｽIｿｽﾉは「ｿｽｿｽ::ｿｽmｿｽ[ｿｽhｿｽeｿｽXｿｽg[ｿｽqｿｽｿｽ]ｿｽvｿｽｿｽXｿｽｿｽｿｽbｿｽVｿｽｿｽｿｽﾅ具ｿｽﾘゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽ OK ｿｽﾅゑｿｽｿｽB
(ｿｽpｿｽｿｽｿｽﾊで囲まゑｿｽｿｽqｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽﾍ、ｿｽｿｽｿｽﾅに御存ｿｽmｿｽﾅゑｿｽｿｽｿｽｿｽ)

ｿｽｿｽｿｽﾌとゑｿｽｿｽAｿｽuｿｽｿｽ::ｿｽvｿｽﾍ省暦ｿｽｿｽ`ｿｽｿｽｿｽgｿｽｿｽｿｽ骼厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽA
ｿｽ@child::ｿｽ@ｿｽｿｽｿｽ@ｿｽuｿｽvｿｽLｿｽqｿｽｿｽｿｽﾈゑｿｽｿｽB
ｿｽ@descendant::ｿｽ@ｿｽｿｽｿｽ@ｿｽu//ｿｽvｿｽXｿｽｿｽｿｽbｿｽVｿｽｿｽ2ｿｽﾂ。
ｿｽ@self::ｿｽ@ｿｽｿｽｿｽ@ｿｽu.ｿｽvｿｽhｿｽbｿｽgｿｽB
ｿｽ@parent::ｿｽ@ｿｽｿｽｿｽ@ｿｽu..ｿｽvｿｽhｿｽbｿｽg2ｿｽﾂ。
ｿｽﾈどと擾ｿｽｿｽｿｽｿｽｿｽｿｽﾌゑｿｽｿｽｿｽﾊ的ｿｽﾅゑｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾉゑｿｽｿｽｿｽﾄは省暦ｿｽｿｽ`ｿｽｿｽｿｽpｿｽﾓゑｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾌで、ｿｽﾅゑｿｽｿｽｿｽﾎ撰ｿｽｿｽｿｽｿｽｿｽｿｽLｿｽqｿｽｿｽｿｽ@ｿｽｿｽwｿｽｿｽﾅゑｿｽｿｽｿｽｿｽ黷ｽｿｽｿｽｿｽｿｽｿｽｿｽしｿｽｿｽｿｽｿｽｿｽﾆ。

ｿｽﾆりあｿｽｿｽｿｽｿｽｿｽA(2 ｿｽｿｽﾚゑｿｽ XML ｿｽﾍ不ｿｽｿｽｿｽﾈのゑｿｽ)ｿｽﾍ、ｿｽﾅ擾ｿｽｿｽｿｽ XML ｿｽfｿｽ[ｿｽ^ｿｽｿｽｿｽﾆゑｿｽｿｽﾄ使ｿｽせｿｽﾄゑｿｽ轤､ｿｽﾆ、
ｿｽPｿｽﾉ「ｿｽeｿｽXｿｽgｿｽﾅゑｿｽｿｽBｿｽvｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ得るたｿｽﾟにゑｿｽAｿｽｿｽｿｽいｿｽｿｽﾈ構ｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽﾆゑｿｽｿｽﾎ、[ｿｽｿｽｿｽｿｽｿｽmｿｽ[ｿｽh]-[Itemsｿｽvｿｽfｿｽmｿｽ[ｿｽh]-[SampleClassｿｽvｿｽfｿｽmｿｽ[ｿｽh]-[Messageｿｽvｿｽfｿｽmｿｽ[ｿｽh]ｿｽｿｽ
ｿｽeｿｽLｿｽXｿｽgｿｽmｿｽ[ｿｽhｿｽﾌゑｿｽｿｽｿｽｿｽAｿｽﾅ擾ｿｽｿｽﾉ鯉ｿｽｿｽﾂゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ得ゑｿｽﾆ考ｿｽｿｽｿｽｿｽﾎ、
ｿｽ@S = doc.SelectSingleNode("Items/SampleClass/Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("Items/SampleClass/Message").InnerText
ｿｽ@S = doc.SelectNodes("Items/SampleClass/Message/text()")(0).Value
ｿｽ@S = doc.SelectNodes("Items/SampleClass/Message")(0).InnerText
ｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽgｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽ驍｢ｿｽﾍ子ｿｽｿｽｿｽmｿｽ[ｿｽhｿｽﾌゑｿｽｿｽｿｽｿｽAｿｽﾅ擾ｿｽｿｽｿｽMessageｿｽvｿｽfｿｽmｿｽ[ｿｽhｿｽｿｽｿｽｿｽoｿｽｿｽｿｽﾆ考ｿｽｿｽｿｽｿｽﾎ、
ｿｽ@S = doc.SelectSingleNode("descendant::Message[1]/text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Message").InnerText
ｿｽ@S = doc.SelectSingleNode("//Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Message").InnerText
ｿｽﾈどとゑｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽ驍｢ｿｽﾍ、Number ｿｽvｿｽfｿｽｿｽ ID ｿｽﾌようｿｽﾉ茨ｿｽｿｽｿｽｿｽAｿｽuｿｽｿｽｿｽl 123 ｿｽﾉ対会ｿｽｿｽｿｽｿｽ驛ｿｽbｿｽZｿｽ[ｿｽWｿｽｿｽ謫ｾｿｽｿｽｿｽｿｽvｿｽﾆ考ｿｽｿｽｿｽｿｽﾈゑｿｽA
ｿｽ@S = doc.SelectSingleNode("descendant::Number[number(self::node())=123]/parent::SampleClass/child::Message/child::text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Number[number(self::node())=123]/parent::SampleClass/Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Number[number(.)=123]/../Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Number[number()=123]/../Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Number[text()='123']/../Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Number[.='123']/ancestor::node()//Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Number[.='123']/ancestor::node()//Message").InnerText
ｿｽ@S = doc.SelectSingleNode("//Number[number(.)=123]/../Message/text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Message[parent::node()/child::Number/child::text()='123']/text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Message[parent::node()/child::Number/text()='123']/text()").Value
ｿｽ@S = doc.SelectSingleNode("descendant::Message[parent::node()/descendant::text()='123']/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Message[../descendant::*='123']/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Message[../Number/text()='123']/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Message[../Number/text()=123]/text()").Value
ｿｽ@S = doc.SelectSingleNode("//Message[../Number='123']").InnerText
ｿｽﾈどとゑｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 13:28:50

'XMLｿｽtｿｽ@ｿｽCｿｽｿｽｿｽﾅゑｿｽ
<?xml version="1.0" encoding="utf-8" ?>
<RootEle>
<Ele>
<Node1>TestNode1</Node1>
<Node2>
<Child1>TestNode1_Child1</Child1>
<Child2>TestNode1_Child2</Child2>
</Node2>
</Ele>
<Ele>
<Node1>TestNode1</Node1>
<Node2>
<Child1>TestNode1_Child1</Child1>
<Child2>TestNode1_Child2</Child2>
</Node2>
</Ele>
</RootEle>

'ｿｽ¥ｿｽ[ｿｽXｿｽtｿｽ@ｿｽCｿｽｿｽ
        Dim StrChild1 As String
        Dim StrChild2 As String

        'XPathｿｽｿｽｿｽﾌ托ｿｽｿｽ
        Dim SelectNodesXPath As String

        Dim doc As XmlDocument = New XmlDocument
ｿｽ@ｿｽ@ｿｽ@ｿｽ@'XmlPathｿｽﾉはフｿｽ@ｿｽCｿｽｿｽｿｽﾌ撰ｿｽﾎパｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽ
        doc.Load(xmlPath)

        'ｿｽmｿｽ[ｿｽhｿｽﾌ抵ｿｽｿｽｿｽ"ｿｽｿｽｿｽoｿｽﾄゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾌ対搾ｿｽ
        SelectNodesXPath = "//child::Ele/child::Node1[text()='TestNode1']/parent::*/child::Node2/child::*"

        'Node2ｿｽﾈ会ｿｽｿｽｿｽmｿｽ[ｿｽhｿｽｿｽｿｽXｿｽgｿｽﾉ格ｿｽ[
        Dim NodeList As XmlNodeList = doc.SelectNodes(SelectNodesXPath)

        'ｿｽqｿｽmｿｽ[ｿｽhｿｽｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽｿｽ
        If NodeList.Item(0).HasChildNodes Then

            'ｿｽｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽﾍ要ｿｽfｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽﾅゑｿｽｿｽB
            For Each Node As XmlNode In NodeList

                Select Case Node.LocalName
                    Case "Child1"
                        'ｿｽvｿｽfｿｽｿｽﾌテｿｽLｿｽXｿｽgｿｽｿｽｿｽｿｽｿｽｿｽ
                        StrChild1 = Node.InnerText

                    Case "Child2"
                        'ｿｽvｿｽfｿｽｿｽﾌテｿｽLｿｽXｿｽgｿｽｿｽｿｽｿｽｿｽｿｽ
                        StrChild2 = Node.InnerText

                End Select
            Next
        Else
            'ｿｽqｿｽmｿｽ[ｿｽhｿｽｿｽｿｽｿｽｿｽﾝゑｿｽｿｽﾈゑｿｽ

        End If

StrChild1 ,StrChild2ｿｽｿｽ Node1ｿｽｿｽvｿｽfｿｽﾌ値ｿｽｿｽｿｽｿｽｿｽｿｽTｿｽｿｽｿｽvｿｽｿｽｿｽﾅゑｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 13:31:01

ｿｽｿｽﾔ最擾ｿｽｿｽｿｽNode2ｿｽﾌ子ｿｽvｿｽfChild1ｿｽAChild2ｿｽｿｽｿｽｿｽｿｽｿｽTｿｽｿｽｿｽvｿｽｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 13:36:46

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽありがｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽB
XPathｿｽﾌ撰ｿｽｿｽｿｽｿｽﾈ包ｿｽｿｽ@ｿｽｿｽmｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでとてゑｿｽﾗ具ｿｽｿｽﾉなゑｿｽﾜゑｿｽｿｽｿｽｿｽB

ｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽﾔでの載ゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽAｿｽﾔ信ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌに托ｿｽﾏゑｿｽｿｽ關費ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽxｿｽﾍ難ｿｽｿｽｿｽｿｽｿｽﾔのゑｿｽﾌゑｿｽｿｽｿｽﾌまま貼ｿｽｿｽtｿｽｿｽｿｽﾄみまゑｿｽｿｽｿｽｿｽB
ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽ 2007/06/10(ｿｽｿｽ) 13:36:46

ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士 2007/06/11(ｿｽｿｽ) 02:38:13

ｿｽｿｽｿｽxｿｽﾍ、ｿｽﾌ心ｿｽﾈ趣ｿｽｿｽｿｽｿｽeｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽ謔､ｿｽﾈ…ｿｽB

ｿｽTｿｽｿｽｿｽvｿｽｿｽｿｽｿｽｿｽｿｽsｿｽｿｽｿｽｿｽﾆ、ｿｽuDim NodeList As XmlNodeListｿｽvｿｽﾉ、
ｿｽ@<Child1>TestNode1_Child1</Child1>
ｿｽ@<Child2>TestNode1_Child2</Child2>
ｿｽ@<Child1>TestNode1_Child1</Child1>
ｿｽ@<Child2>TestNode1_Child2</Child2>
ｿｽｿｽ 4 ｿｽﾂの要ｿｽfｿｽmｿｽ[ｿｽhｿｽｿｽｿｽiｿｽ[ｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽうｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾍ包ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽA
ｿｽｿｽｿｽｿｽﾉつゑｿｽｿｽﾄ、ｿｽｿｽｿｽｿｽ答ゑｿｽｿｽｿｽﾎ良ゑｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB

> ｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽｿｽAｿｽｿｽしｿｽｿｽｿｽｿｽｿｽﾄ…ｿｽcｿｽｿｽｿｽｿｽ? (^^;

> 'ｿｽmｿｽ[ｿｽhｿｽﾌ抵ｿｽｿｽｿｽ"ｿｽｿｽｿｽoｿｽﾄゑｿｽｿｽｿｽｿｽﾆゑｿｽｿｽﾌ対搾ｿｽ
ｿｽｿｽｿｽﾌコｿｽｿｽｿｽｿｽｿｽgｿｽﾌ意厄ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽAｿｽﾇゑｿｽｿｽｿｽｿｽｿｽｿｽﾓ厄ｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽ?

> SelectNodesXPath = "//child::Ele/child::Node1[text()='TestNode1']/parent::*/child::Node2/child::*"
ｿｽｿｽｿｽﾌ表ｿｽｿｽｿｽﾆゑｿｽｿｽﾄは、
ｿｽ@SelectNodesXPath = "//Ele/Node2[preceding-sibling::Node1='TestNode1']/node()"
ｿｽ@SelectNodesXPath = "//Node2[../Node1='TestNode1']/node()"
ｿｽﾈどゑｿｽgｿｽｿｽｿｽﾜゑｿｽｿｽﾋ。

ｿｽｿｽｿｽｿｽ 2007/06/18(ｿｽｿｽ) 00:04:11

ｿｽﾔ信ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽｿｽｿｽEｿｽﾌ会ｿｽｿｽﾊ弁士ｿｽｿｽｿｽがゑｿｽｿｽいｿｽ教ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄ奇ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽｿｽｿｽ@ｿｽﾍ変なのにゑｿｽｿｽﾜゑｿｽｿｽﾜ難ｿｽｿｽｿｽｿｽﾄゑｿｽﾂ能ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾌで、ｿｽ¥ｿｽ[ｿｽXｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽ閧ｪｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽBｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾌつゑｿｽｿｽﾅゑｿｽｿｽｿｽｿｽB

ｿｽOｿｽｿｽﾌ包ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾄるせｿｽｿｽｿｽﾅ読みにゑｿｽｿｽｿｽｿｽｿｽｿｽﾍになゑｿｽｿｽﾄゑｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽﾜゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽｿｽAｿｽｿｽｿｽ竄｢ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽﾌゑｿｽ
ｿｽｿｽｿｽ黷ｩｿｽｿｽｿｽｿｽしｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB

ｿｽｿｽｿｽﾌペｿｽ[ｿｽWｿｽﾌトｿｽbｿｽvｿｽｿｽ

Created by board of various Programming Library.