ผมอยากทราบว่าผมจะรับค่า xml ด้วย VB ได้อย่างไรครับ รบกวนดูให้หนอ่ยน่ะครับ หรือขอแนวทางหน่อย

Private Sub ReadXMLFile()

        Dim ds As New DataSet()
        Dim strXMLFile = "C:\data.xml"
        ds.ReadXml(strXMLFile)

        If Not ds Is Nothing Then
            Me.DataGridView1.DataSource = ds.Tables(0)
        End If

    End Sub

Dim xmlDoc As New XmlDocument()

If System.IO.File.Exists("...\test.xml") Then
	xmlDoc.Load("...\test.xml")
	Dim elm As XmlElement = xmlDoc.DocumentElement
	Dim cNode As XmlNodeList = elm.ChildNodes

	For Each node As XmlNode In cNode 
		If node.Name = "room_details" Then
			Console.WriteLine("{0}", node.LastChild.LastChild.Name.ToString())
			If node.LastChild.LastChild.Name.ToString() = "childs" Then
				MessageBox.Show(node.LastChild.LastChild.InnerText.ToString())
			End If
		End If
	Next
Else
	Console.WriteLine("The file {0} could not be located", "...\test.xml")
End If

XmlDocument xmlDoc = new XmlDocument();

if (System.IO.File.Exists("...\\test.xml"))
{
     xmlDoc.Load("...\\test.xml");
     XmlElement elm = xmlDoc.DocumentElement;
     XmlNodeList cNode = elm.ChildNodes;

     foreach (XmlNode node in cNode)
     {
           if (node.Name == "room_details")
           {
                Console.WriteLine("{0}", node.LastChild.LastChild.Name.ToString());
                if (node.LastChild.LastChild.Name.ToString() == "childs")
                {
                     MessageBox.Show(node.LastChild.LastChild.InnerText.ToString());
                }
            }
       }
}
else
{
      Console.WriteLine("The file {0} could not be located", "...\\test.xml");
}