Option Explicit
Option Strict
Imports System
Imports System.IO
Imports System.Xml
Public Class Sample
Public Shared Sub Main()
Dim writer As XmlTextWriter = Nothing
writer = New XmlTextWriter(Console.Out)
writer.Formatting = Formatting.Indented
writer.WriteStartElement("order")
writer.WriteAttributeString("date", "2/19/01")
writer.WriteAttributeString("orderID", "1")
writer.WriteFullEndElement()
writer.Close()
End Sub
End Class