Public Shared Function testxmldocument()
Dim xmlstring As String = "<xxx><aa><bb>2222</bb><cc>3333</cc></aa></xxx>"
Dim doc As XmlDocument = New XmlDocument
doc.LoadXml(xmlstring) ' 加载xmlstring字符串到XmlDocument对象(如果字符串的格式不正确加载会报错)
Dim aanode As XmlNode = doc.SelectSingleNode("//xxx") '找到<xxx></xxx>节点之间的所有节点 XmlNode类型
Dim aanodelist As XmlNodeList = aanode.ChildNodes '获得<aa></aa>节点下的所有子节点 XmlNodeList类型
Dim node As XmlNode '定义节点XmlNode
For Each node In aanodelist '遍历XmlNodeList
Dim bb As String = node.Item("bb").FirstChild.InnerText.Trim() '找对应节点名字的值 <bb>2222</bb>
Dim cc As String = node.Item("cc").FirstChild.InnerText.Trim()
MessageBox.Show("bb:" + bb + "cc:" + cc)
Next
End Function
vb中利用XmlDocument XmlNode XmlNodeList 解析xml格式的字符串
最新推荐文章于 2021-08-28 10:30:44 发布