problema con salvataggio file XML

[Skyline@69]

se non ti dà troppa noia te ne sarei grato

Allora alla prima googlata ho trovato qualcosina, in inglese ma funzionante...
ho fatto una prova a modo mio, cioè piccolo form con button, alla pressione del button avvia la sub..
questo è tutto il codice dell'applicazione, ti basta fare copia incolla e anche se è in inglese vedi subito come funziona, è abbastanza intuitivo

    VB Programming

Imports System.Xml
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Main()
    End Sub
End Class
 
Module Module1
    Sub Main()
        ' Create a new file in current dir
        Dim textWriter As XmlTextWriter = New XmlTextWriter(".\myXmFile.xml", Nothing)
        ' Opens the document
        textWriter.WriteStartDocument()
        ' Write comments
        textWriter.WriteComment("First Comment XmlTextWriter Sample Example")
        textWriter.WriteComment("myXmlFile.xml in root dir")
        ' Write first element
        textWriter.WriteStartElement("Student")
        textWriter.WriteStartElement("r", "RECORD", "urn:record")
        ' Write next element
        textWriter.WriteStartElement("Name", "")
        textWriter.WriteString("Student")
        textWriter.WriteEndElement()
        ' Write one more element
        textWriter.WriteStartElement("Address", "")
        textWriter.WriteString("Colony")
        textWriter.WriteEndElement()
        ' WriteChars
        textWriter.WriteStartElement("Char")
        Dim ch() As Char = {"b", "l", "last"}
        textWriter.WriteChars(ch, 0, ch.Length)
        textWriter.WriteEndElement()
        ' Ends the document.
        textWriter.WriteEndDocument()
        ' close writer
        textWriter.Close()
    End Sub
End Module

Poi però non so se è compatibile con ciò che devi fare tu, io mi sono limitato a trovare una routine di salvataggio xml valida