Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
     System.EventArgs) Handles Button1.Click
        Dim myds As DataSet = New DataSet
 
        myds.ReadXml("C:\Kunde1.xml")
        DataGridView1.DataSource = BindingSource1
        BindingSource1.DataSource = myds.Tables(6) 'Tabelle 6 sind die Daten 
        ' über den Kunden
        DataGridView1.AutoResizeColumns()
 
 
 
    End Sub