XML Parse

Imports System.Xml
Module Module1

    Sub Main()
        'Loading the XML file
        Dim xml As New XmlDocument()
        xml.Load("SampleTrxXMLTestLogFile.xml")

        'Fetching the specific Nodes by Name
        Dim node_list As XmlNodeList = xml.SelectNodes("/TestRun/Results/UnitTestResult")

        For Each node As XmlNode In node_list
            Console.WriteLine("UnitTestResult Node ID : " + node("UnitTestResult").Attributes("relativeResultsDirectory").Value)
            Console.WriteLine("Test Name : " + node("UnitTestResult").Attributes("testName").Value)
            Console.WriteLine("Message : " + node("Message").InnerText)
            Console.WriteLine("Std Error : " + node("StdErr").InnerText)
        Next

    End Sub

End Module