Dim ds As New DataSet
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        ds.ReadXml("F:\Work Dev\VSNet Dev\Test\LoadXmlIntoDataSet.xml", _
        XmlReadMode.InferSchema)
        DataGrid1.DataSource = ds
        DataGrid1.DataMember = "kunden"
        TextBox1.DataBindings.Add("Text", ds, "kunden.firma")
    End Sub

<?xml version="1.0" encoding="utf-8" ?> 
<DataSet>
<kunden>
  <Id>k0001</Id>
  <firma>Testers Test-GmbH</firma> 
  <vorname>Hans</vorname> 
  <nachname>Tester</nachname> 
  <strasse>Elberfelder Strasse 2</strasse> 
  <plz>85623</plz> 
  <stadt>Test-City</stadt> 
</kunden>
<kunden>
  <Id>k0002</Id>
  <firma>Testers Test-GmbH2</firma> 
  <vorname>Hans2</vorname> 
  <nachname>Tester2</nachname> 
  <strasse>Elberfelder Strasse 22</strasse> 
  <plz>856232</plz> 
  <stadt>Test-City2</stadt> 
</kunden>
</DataSet>