Lo stavo cercando!

Dim DataSet1 as new DataSet
Dim mySqlDataAdapter As OleDbDataAdapter
mySqlDataAdapter = New OleDbDataAdapter("la tua select", latuaConnessione)
mySqlDataAdapter.Fill(DataSet1,"NomeTuaTabellaNonN ecessario")
Me.grdDataGrid.DataSource = DataSet1



Non so se ho scritto bene perchè l'ho tradotto da c#, forse ho sbajato qualcosa nella creazione degli oggetti! Controlla!