validate xml

 Dim SchemaSet As New XmlSchemaSet()
        Dim rootPath As String = AppDomain.CurrentDomain.BaseDirectory
        Dim filePath As String = System.IO.Path.Combine(rootPath, "..\..\")
        SchemaSet.Add("http://tempuri.org/UnitTest.xsd", filePath + "UnitTests\UnitTest.xsd")
        Dim Settings As New XmlReaderSettings()
        Settings.IgnoreWhitespace = True
        Settings.ValidationType = ValidationType.Schema
        Settings.Schemas.Add(SchemaSet)

        Dim rdr As XmlReader = XmlReader.Create(New FileStream(filePath + "UnitTests\LoadUnitTest.xml", FileMode.Open, FileAccess.Read), Settings)
        rdr.MoveToContent()

        While rdr.Read
            If rdr.NodeType = XmlNodeType.Element Then

            End If