小妹遇到紧急问题，求救，关于vb.net

[dymygold]

有两个问题，均是关于xml的，请大家帮忙，谢谢

1.Dim xml_text_reader As New XmlTextReader("c:\1.xml") 用这个语句，我可以打开并读出xml文件的内容，但是实际情况不是文件，而是直接返回字符串(xml格式)，我想直接解析XML字符串，请问怎么操作？

2.xml文件中有多个NewDate数据，请问我怎么判断有多少个newData并读出来？
<NewDate>
<Name>1</Name>
</NewDate>
<NewDate>
<Name>2</Name>
</NewDate>
<NewDate>
<Name>3</Name>
</NewDate>

[智者知已应修善业]

明显是表格形式,直接读取到数据表 http://msdn.microsoft.com/zh-cn/library/system.data.dataset.readxml(v=vs.110).aspx http://msdn.microsoft.com/zh-cn/library/ms143368(v=vs.110).aspx http://blog.csdn.net/xianfajushi/article/details/11742249

[gjw_8888]

        Dim document As XDocument = XDocument.Load("c:\1.xml")
        For Each s As XElement In document.Descendants("Name").ToArray
            MessageBox.Show(s.Value)
        Next

[wind_cloud2011]

       Dim ds As DataSet = New DataSet()
        ds.ReadXml("4.xml")
        Dim i As Integer
        For i = 0 To ds.Tables(0).Rows.Count - 1
            ListBox1.Items.Add(ds.Tables(0).Rows(i)(0).ToString())
       Next

[wind_cloud2011]

ds.Tables(0).Rows(i)(0).ToString()便是Name对应的值

[gba8jing]

Dim XmlDoc As New XmlDocument XmlDoc.Load("c:\1.xml") Dim NoList As XmlNodeList = XmlDoc.ChildNodes Dim Rn As XmlNode For Each Rn In NoList Dim xe As XmlElement = CType(Rn, XmlElement) If xe.Name = "NewDate" Then Msgbox( xe.InnerText) End If Next

[红衣老大]

小妹果然待遇好

[iyomumx]

For Each nd In XDocument.Load("dates.xml")...<NewDate>
    Console.WriteLine(nd)
Next

取Name节点就再接个.<Name>，取节点值就用nd.Value

[chdf535]

取Name节点