Te envío una función que convierte una cadena XML en un DataTable:
Código:
Private Sub Load()
Dim ws As New namespace.TuServicio
Dim dt As DataTable = StrXml2Table(ws.TuMetodoQueDevuelveXML())
' ....
End Sub
Public Function StrXml2Table(ByVal StrXML As String) As DataTable
Dim ms As MemoryStream
Try
Dim buf() As Byte
Dim ds As New DataSet
buf = System.Text.UTF8Encoding.ASCII.GetBytes(StrXML)
ms = New MemoryStream(buf)
ds.ReadXml(ms)
Return ds.Tables(0)
Catch ex As Exception
' Hacer algo
Finally
If Not ms Is Nothing Then
ms.Close()
End If
End Try
End Function
Saludos
PS. No sé si funcione bien o no, no pude probarlo mucho