Dim DS As New DataSet
Dim DA As New OleDbDataAdapter("Select field1, field2  From SomeTable", _
  connection)
DA.Fill(DS, "MyTable") 
DataGridView1.DataSource = DS
DataGridView1.DataMember = "MyTable"

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist