Imports System
Imports System.Xml
Imports System.Xml.Schema
Imports System.IO
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Collections
Imports System.Data
Imports System.Windows.Forms
Public Class MainClass
Shared Sub Main()
Dim xtr As New XmlTextReader("book.xml")
Dim xvr As New XmlValidatingReader(xtr)
xvr.ValidationType = ValidationType.Schema
AddHandler xvr.ValidationEventHandler, _
New ValidationEventHandler(AddressOf ValidationErrorHandler)
While xvr.Read()
If TypeOf xvr.SchemaType Is XmlSchemaComplexType Then
Console.WriteLine("{0} - {1}", xvr.NodeType, xvr.Name)
While xvr.MoveToNextAttribute()
Console.WriteLine(" {0} - {1}: {2}", _
xvr.NodeType, xvr.Name, xvr.Value)
End While
End If
End While
End Sub
Shared Sub ValidationErrorHandler(ByVal sender As Object, _
ByVal args As ValidationEventArgs)
Console.WriteLine("XML Document Validation Failure")
Console.WriteLine()
Console.WriteLine("The ValidatingReader Failed with severity : {0}", _
args.Severity)
Console.WriteLine("The failure message was: {0}", args.Message)
End Sub
End Class
'
'
'
' C# How to Program
'
'
' Java How to Program, 4/e
'
'
' Visual Basic .NET How to Program
'
'
' Advanced Java 2 Platform How to Program
'
'
' Python How to Program
'
'