Dim _dskunden2 As New DataSet 
'Eine Referenzvariable zu einem Dataset wird erstellt (_dskunden2)
'Ein Dataset-Objekt wird im Speicher erstellt (New)
'Die Referenzvariable verweist auf das neue Dataset
 
 
Dim _dtkunden2 As New DataTable("Kunden") 
'Eine Referenzvariable zu einer Datatable wird erstellt (_dtkunden2)
'Ein DataTable-Objekt wird im Speicher erstellt (New)
'Die Referenzvariable verweist auf die neue Datatable
 
 
_dskunden2.Tables.Add(_dtkunden2)
'Der Tables-Auflistung des Dataset wird eine Referenz
'auf das Datatable-Objekt hinzugefügt, das unter dtKunden2
'erstellt worden ist 
 
 
_dskunden2.ReadXml(_KundenPfad)
'Die Methode ReaXML erzeugt aus dem File im Kundenpfad (Schema und Daten)
'ein NEUES Datatable-Objekt und fügt eine Referenz der 
'Dataset-Auflistung hinzu (Dataset-Inhalt ist zuvor gelöscht worden).
'Der Tabellen-Name dieses neuen Objekts entspricht dem Namen, der
'beim Schreiben eingetragen war, dessen Spalten-Objekte werden gemäß
'dem Schema, dessen Zeilenobjekte gemäß den Daten erstellt (wie geschrieben).
 
 
dgvKunden.DataSource = _dtkunden2
'Die Referenzvariable dtKunden2 zeigt immer noch auf das leere
'Datatable-Objekt, das in der zweiten Zeile erstellt worden ist.
'Im Grid wird nichts angezeigt.
 
'Ergänzung:
_dtKunden2 = _dsKunden2.Tables("Kunden")
'Jetzt zeigt die Referenzvariable auf die gelesene Tabelle "Kunden"
'(Objekt im Speicher)
'Das zuerst erstellte Datatable-Objekt verliert seine letzte Referenz,
'wird freigegeben und danach zerstört.