本文整理匯總了VB.NET中System.Xml.XmlReaderSettings.ValidationType屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET XmlReaderSettings.ValidationType屬性的具體用法？VB.NET XmlReaderSettings.ValidationType怎麽用？VB.NET XmlReaderSettings.ValidationType使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在類System.Xml.XmlReaderSettings的用法示例。
在下文中一共展示了XmlReaderSettings.ValidationType屬性的2個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: Main
' 導入命名空間
Imports System.Xml
Imports System.Xml.Schema
Imports System.IO
Public Module Sample
Public Sub Main()
' Create the XmlSchemaSet class.
Dim sc as XmlSchemaSet = new XmlSchemaSet()
' Add the schema to the collection.
sc.Add("urn:bookstore-schema", "books.xsd")
' Set the validation settings.
Dim settings as XmlReaderSettings = new XmlReaderSettings()
settings.ValidationType = ValidationType.Schema
settings.Schemas = sc
AddHandler settings.ValidationEventHandler, AddressOf ValidationCallBack
' Create the XmlReader object.
Dim reader as XmlReader = XmlReader.Create("booksSchemaFail.xml", settings)
' Parse the file.
While reader.Read()
End While
End Sub
' Display any validation errors.
Private Sub ValidationCallBack(sender as object, e as ValidationEventArgs)
Console.WriteLine($"Validation Error:{vbCrLf} {e.Message}")
Console.WriteLine()
End Sub
End Module輸出：
Validation Error: The element 'book' in namespace 'urn:bookstore-schema' has invalid child element 'author' in namespace 'urn:bookstore-schema'. List of possible elements expected: 'title' in namespace 'urn:bookstore-schema'. Validation Error: The element 'author' in namespace 'urn:bookstore-schema' has invalid child element 'name' in namespace 'urn:bookstore-schema'. List of possible elements expected: 'first-name' in namespace 'urn:bookstore-schema'.
示例2: Tester
' 導入命名空間
Imports System.Xml
Imports System.Xml.Schema ' contains XmlSchemaSet class
Public Class Tester
Private Shared schemas As XmlSchemaSet ' schemas to validate against
Private Shared valid As Boolean = True ' validation result
Public Shared Sub Main
schemas = New XmlSchemaSet() ' create the XmlSchemaSet class
schemas.Add("http://www.deitel.com/booklist", "book.xsd")
Dim settings As New XmlReaderSettings()
settings.ValidationType = ValidationType.Schema
settings.Schemas = schemas
AddHandler settings.ValidationEventHandler, AddressOf ValidationError
Dim reader As XmlReader = XmlReader.Create("YourFile.xml", settings)
While reader.Read()
End While
Console.WriteLine(valid)
valid = True ' reset variable
reader.Close() ' close reader stream
End Sub
Private Shared Sub ValidationError(ByVal sender As Object, _
ByVal arguments As ValidationEventArgs)
Console.WriteLine(arguments.Message)
valid = False
End Sub
End Class