XML en Visual Basic

[polgrana]

Buenos dias,
Soy nuevo(MUY) en esto de la programacion en .NET.
Estoy trabajando con Visual Basic y tengo el siguiente codigo:

---------------------------------------------------------------------------------------------------------------------------

Public Class Form1

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim cnn As New SqlConnection("Server=adserver;uid=sa;pwd=1234;dat abase=empatic")
Dim da As New SqlDataAdapter("select * from producte for xml path('producte'), root('Productes')", cnn)
Dim ds As New DataSet

da.Fill(ds)
DataGridView1.DataSource = ds.Tables(0)
Dim a As String = ds.Tables(0).ToString


End Sub

End Class

----------------------------------------------------------------------------------------------------------------------------

Lo que hace este codigo es conectarse a un Sql Server y ejecutar una consulta. Dicha consulta es generada en un XML de una sola linia.

Mi pregunta es: Como puedo hacer para cuando obtenga la información en VB, me la muestre con forma xml y no en una sola linea.


Muchas Gracias