Private Sub EDLogger_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
  Handles Me.Load
        XMLLaden()
    End Sub               'Form wird initialisiert und Standard.xml geladen

Private Sub XMLLaden()
        xml = (Application.StartupPath & "\" & "Standard.xml")
        ds.Clear()
        DataGridView1 = New DataGridView
        ds.ReadXml(xml)
        bs = New BindingSource(ds, "EDL")
        DataGridView1.DataSource = bs
        Me.Controls.Add(DataGridView1)
        With DataGridView1
               .
               .
               .
        End With
        Me.KeyPreview = True
        TCTextBox1.Text = ("00:00:00:00")
    End Sub                    'XML wird geladen und Datagridview erzeugt

Private Sub Neu_ToolStripButton1_Click(ByVal sender As System.Object, ByVal e _
  As System.EventArgs) Handles Neu_ToolStripButton1.Click
     XMLLaden()
    End Sub              'Button "Neu" um Standard.xml zu laden

 Private Sub LoggingClip()
        With bs
            .AddNew()
            RowCount = DataGridView1.RowCount
            RowCount = RowCount - 2
        End With
        DataGridView1.CurrentCell = DataGridView1(1, RowCount)
 
    End Sub                     'Zeile für neuen Clip erzeugen