XmlSchemaComplexType Class represents complexType element from XML Schema
Imports System
Imports System.Xml
Imports System.Xml.Schema
Class XMLSchemaExamples
Public Shared Sub Main()
Dim schema As New XmlSchema()
Dim element As New XmlSchemaElement()
schema.Items.Add(element)
element.Name = "stringElementWithAnyAttribute"
Dim complexType As New XmlSchemaComplexType()
element.SchemaType = complexType
Dim simpleContent As New XmlSchemaSimpleContent()
complexType.ContentModel = simpleContent
Dim extension As New XmlSchemaSimpleContentExtension()
simpleContent.Content = extension
extension.BaseTypeName = New XmlQualifiedName("string", "http://www.w3.org/2001/XMLSchema")
Dim anyAttribute As New XmlSchemaAnyAttribute()
extension.AnyAttribute = anyAttribute
anyAttribute.Namespace = "targetNamespace"
End Sub
End Class
Related examples in the same category
