Private dt As New DataTable("MyTable")
    Dim dr As DataRow = dt.NewRow
 
 
 'dt.Columns.Add("Schlagwort", GetType(String))
        dc = dt.Columns.Add("Schlagwort", GetType(String))
        dc.Unique = True
 
        dt.Columns.Add("Inhalt", GetType(String))
 
        ' Daten binden
        bs = New BindingSource(dt, Nothing)
 
        DataGridView1.DataSource = bs
 
        dr("Schlagwort") = "Schlagwort"
        dr("Inhalt") = "Inhalt"
        dt.Rows.Add(dr)
        '    load_grid()