1

ジャンル値「ドラマ」を取得しましたが、取得できるのは1つだけです。「ドラマ」、「コメディ」、「スリラー」の3つのジャンル値を取得するにはどうすればよいですか?

<details>
    <id>734357</id>
    <title>vb best</title>
    <year>2012-07-27</year>
    <genre>Drama</genre>
    <genre>Comedy</genre>
    <genre>Thriller</genre
    <studio></studio>
</details>


    Dim doc As New XmlDocument()
    Dim nodes As XmlNodeList
    doc.Load(FILE_NAME)

    nodes = doc.SelectNodes("/details")
    Dim node As XmlNode

    For Each node In nodes

        Dim nodeid As XmlNode = node.SelectSingleNode("id")
        If nodeid IsNot Nothing Then
            MsgBox(node.SelectSingleNode("id").InnerText)
        End If
        Dim nodeimdb_id As XmlNode = node.SelectSingleNode("title")
        If nodeimdb_id IsNot Nothing Then
            MsgBox(node.SelectSingleNode("title").InnerText)
        End If

        Dim nodegenre As XmlNode = node.SelectSingleNode("genre")
        If nodegenre IsNot Nothing Then
            MsgBox(node.SelectSingleNode("genre").InnerText)
        End If

    Next
4

2 に答える 2

0
Dim doc As New XmlDocument()
Dim nodes As XmlNodeList
doc.Load(FILE_NAME)

nodes = doc.SelectNodes("/details")
Dim node As XmlNode

For Each node In nodes

    Dim nodeid As XmlNode = node.SelectSingleNode("id")
    If nodeid IsNot Nothing Then
        MsgBox(nodeid.InnerText)
    End If
    Dim nodeimdb_id As XmlNode = node.SelectSingleNode("title")
    If nodeimdb_id IsNot Nothing Then
        MsgBox(nodeimdb_id.InnerText)
    End If

    Dim genreNodes As XmlNodeList = node.SelectNodes("genre")
    For each genreNode in genreNodes
        MsgBox(genreNode.InnerText)
    Next

Next

片道になります。すでにノードを取得しているので、再度取得する必要はありません。

于 2012-10-23T21:14:31.243 に答える
0

.SelectNodesの代わりに使用.SelectSingleNode

于 2012-10-23T21:14:33.787 に答える