如題：見下圖，怎樣獲取指定的xml節點下的所有內容，并以表格形式顯示出來
xml檔案中有list1與list2這二個節點，我現在只想獲取list1下面的二條記錄，并在表格控制元件中顯示出來，怎么做？（圖中表格中的控制元件的內容，為了說明效果，手動強制添加進去的，不是通過XML檔案中讀取的）
以下為xml檔案內容：
<?xml version="1.0" encoding="UTF-8" ?>
- <mkryxx>
<state>y</state>
<result />
- <list1>
- <item id="1">
<xm>李麗麗A</xm>
<sfzh>532526271986030301A</sfzh>
<xb>女A</xb>
<csrq>1986-3-3 0:00:00A</csrq>
<lxdh>A</lxdh>
<xxdz>A</xxdz>
</item>
- <item id="2">
<xm>王麗紅</xm>
<sfzh>532526271986030301A</sfzh>
<xb>女A1</xb>
<csrq>1986-3-3 0:00:00A1</csrq>
<lxdh>A1</lxdh>
<xxdz>A1</xxdz>
</item>
</list1>
- <list2>
- <item id="1">
<xm>張江</xm>
<sfzh>532526271986030301B1</sfzh>
<xb>女</xb>
<csrq>1986-3-3 0:00:00B1</csrq>
<lxdh>B1</lxdh>
<xxdz>B1</xxdz>
</item>
- <item id="2">
<xm>孫健</xm>
<sfzh>532526271986030301B2</sfzh>
<xb>女B2</xb>
<csrq>1986-3-3 0:00:00B2</csrq>
<lxdh>B2</lxdh>
<xxdz>B2</xxdz>
</item>
</list2>
</mkryxx>
uj5u.com熱心網友回復：
Sub Command1_Click()
Set Dom = CreateObject("Microsoft.XMLDOM")
Dom.async = False
Dom.Load "C:\Documents and Settings\Administrator\桌面\a.xml"
Set Node = Dom.SelectSingleNode("mkryxx").SelectSingleNode("list1").ChildNodes(1)
For Each x In Node.ChildNodes
Debug.Print x.Text
Next
End Sub
uj5u.com熱心網友回復：
對我有用，謝謝！轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/132468.html
標籤：VB基礎類