Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Dim ds As New DataSet
        ds.ReadXml("F:\Work Dev\VSNet Dev\Test\test.xml")
        Dim dt As DataTable = ds.Tables(1)
        dt.Columns.Add("z", GetType(System.String), "Parent.z")
        dt.Columns.Add("w", GetType(System.String), "Parent.w")
        DataGrid1.DataSource = ds.Tables(1)
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist