给你点代码参考一下,不是完整的,具体的代码你自己研究
Dim _Doc As New XmlDocument
_Doc.LoadXml(_strXml)
Dim xParent As XmlNode
Dim xNode As XmlNode
xParent = _Doc.SelectNodes("rss")(0)
Dim xList As XmlNodeList
xList = xParent.SelectNodes("media")
xNode = xList(0)
'在下面判断属性为url的,取出其值即可
For I = 0 To xNode.Attributes.Count - 1
MsgBox(xNode.Attributes(I).Name)
MsgBox(xNode.Attributes(I).Value)
Next
你可以打开你的MSDN Library 查找XML,里面会有你想要的