Private Sub cmd_adddata_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles cmd_adddata.Click
 
        DataGridView1.Rows.Add("", tb_nachname.Text, tb_vorname.Text, _
          tb_lizenz.Text, tb_verein.Text, "", "", "", "", "", "")
        cb_driver.Items.Add(tb_nachname.Text)
 
    End Sub