Dim MeinDataSet As System.Data.DataSet
Dim Tabelle As System.Data.DataTable
 
Tabelle = New System.Data.DataTable("Tabelle")
Tabelle.Columns.Add("ID", GetType(Integer))
Tabelle.Columns.Add("Name", GetType(String))
Tabelle.Columns.Add("Vorname", GetType(String))
MeinDataSet.Tables.Add(Tabelle)
 
Dim TabellenZeile As System.Data.DataRow = MeinDataSet.Tables.Item( _
  "Tabelle").NewRow()
TabellenZeile("ID") = 1
TabellenZeile("Name") = "TestName"
TabellenZeile("Vorname") = "TestVorname"
 
MeinDataSet.Tables.Item("Tabelle").Rows.Add(TabellenZeile)