Dim ds2 As New DataSet
            Dim table1 As New DataTable("Test")
            table1.Columns.Add("EAN")
            table1.Columns.Add("Menge")
            table1.Columns.Add("Hersteller Art.Nr")
            table1.Columns.Add("Herst.")
            table1.Columns.Add("Name")
            table1.Columns.Add("Einzelpreis")
 
            ds2.Tables.Add(table1)
            Main.dgv2.DataSource = ds2
            Main.dgv2.DataMember = "Test"
 
            Main.dgv2.Columns(0).Visible = False
            Main.dgv2.Columns(1).Width = 50
            Main.dgv2.Columns(2).Width = 150
            Main.dgv2.Columns(3).Width = 150
            Main.dgv2.Columns(4).Width = 450
            Main.dgv2.Columns(5).Width = 80

 Dim param(4) As String
  param.SetValue("test", 0)
            param.SetValue("test", 1)
            param.SetValue("test", 2)
            param.SetValue("test", 3)
            param.SetValue("test", 4)
 Main.dgv2.Rows.Add(param)