private da As OleDbDataAdapter
private dt As DataTable
SqlString = "Select name, vorname, alter from kunden where ort = 'Entenhausen'"
 
ds = New DataSet()
da = New OleDbDataAdapter(Me.SqlString, conn) 'DataObjekt erzeugt
        conn.Open()
        da.Fill(ds, "KundenDaten")                 
 
        conn.Close()
        dt = ds.Tables.Item("ArtikelDaten")