code conversion from vb.net to vb6.0

[dimbil]

Can someone convert the following code from vb.net to vb6.0 please?

Dim settings As New XmlWriterSettings()
settings.Indent = True
settings.Encoding = System.Text.Encoding.UTF8

Dim writer As XmlWriter = XmlWriter.Create("example.xml", settings)

writer.WriteStartDocument()
writer.WriteStartElement("Continent")
writer.WriteStartElement("EUROPE")
writer.WriteStartAttribute("Country")
writer.WriteValue("UK")
writer.WriteEndAttribute()
writer.WriteEndElement()
writer.WriteStartElement("ASIA")
writer.WriteStartAttribute("Country")
writer.WriteValue("Chine")
writer.WriteEndAttribute()
writer.WriteEndElement()
writer.WriteEndDocument()
writer.close()