Dim ds As New DataSet
 
        Dim dt As New DataTable("Teilnehmer")
        dt.Columns.Add("Nr", GetType(Integer)).ColumnMapping = _
          MappingType.Attribute
        dt.Columns.Add("Name", GetType(String))
        dt.Columns.Add("Punkte", GetType(Integer))
 
        ds.Tables.Add(dt)
 
        ds.ReadXml(...)

________
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