como hacer un XML en VB6

[mortiprogramador]

<saludos>
Pues teorizando que tienes los conocimientos de la estructura xml,
lo que tienes que hacer es, en el evento del botón,
recorrer los registros ya sea del datagrid o de un query,
y por cada uno ir generando tags hijos en una variable string.

Dicha variable se inicializará antes del ciclo
con el valor del encabezado del xml

Al finalizar el ciclo, le agregas los tags finales,
finalmente llamas a otra función donde ya
escribas esa variable string en un archivo
al cual, en este caso, guardarás con la extensión xml

Ej:

Código vb:

Private Sub Test(Cadena As String)
UnArchivo = FreeFile
Open App.Path + "\archivo.xml" For Append As #UnArchivo
Print #UnArchivo, Cadena
Close #UnArchivo
End Sub
 

</saludos>