Con esto te conectas a una Bd de Acces.

Imports System
Imports System.Data
Imports System.Data.OleDb


Public conexion As New OleDbConnection
Public Sub BD()
conexion.ConnectionString = "Provider=Microsoft.Jet.OleDb.4.0; Data Source=C:\Documents and Settings\Administrador\Escritorio\Sistema\Copy.mdb ;"

conexion.Open()
End Sub

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Call BD()
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim ds As New DataSet
Dim sel As String

sel = "Select * From [nombre de tabla] "
Dim adapterrrs As OleDbDataAdapter = New OleDbDataAdapter(sel, conexion)
adapterrrs.Fill(ds)

'hata aqui ya tienes tu dataset cargado con los datos y para volcarlos en una grilla

grid.DataSource = dssss.Tables(0)

end sub
Espero esto te pueda servir de ayud.
Saludos.

__________________
La imaginacion es mas importante que el conocimiento...

Patricio Nerio