Si usas SQL
Creas un DataAdapter
Dim adDisplayGrid As SqlClient.SqlDataAdapter="Select...."
Creas un Dataset
Dim dsDisplayGrid As DataSet = New DataSet()
LLenas el Dataset
adDisplayGrid.Fill(dsDisplayGrid, "Tabla")
Luego conectas el Dataset al DataGrid
DataGrid.DataSource = dsDisplayGrid.Tables("Tabla")
Si usas otro tipo de Base de Datos, solo cambias los adaptadores de Sql a OlDb.
Dim adDisplayGrid As OleDbClient.OleDbDataAdapter="Select...."
etc...
Eso es todo, espero eso te sirva