Consulta sobre XML

Hola a todos.

Alguien sabe cual es la forma mas sencilla de pasar un dataset a xml y
viceversa, pero sin perder el esquema del archivo.

yo estoy utilizando, esto.

Public Function Paises() As String
'Trae un solo Pais
Dim ds As New Data.DataSet
Dim strSql1 As String
Dim conn As New
SqlClient.SqlConnection(ConfigurationSettings.AppSettings("Nombre"))
strSql1 = "select * from TablaPaises '"
Dim da3 As New SqlClient.SqlDataAdapter(strSql1, conn)
da3.Fill(ds, "Paises")
conn.Close()
Dim aa As String
aa = ds.GetXml
Paises_pais = (aa)
End Function


Private Function lleno_paises()
Dim Datos As New CBase1
Dim MiString As String
Dim ds As New DataSet
MiString = Datos.Paises()
Dim sr = New System.IO.StringReader(MiString)
ds.ReadXml(sr)
End Function

Pero si algun campo esta null lo pierdo

Gtacias Fabian