Gracias por la ayuda...!! ok ahi se conecta....pero cuando le mando el query INSERT INTO el grid se queda en blanco.... y al cerrar y abrir de nuevo el proyecto resulta que si agregó el registro....que podría hacer?????

ESTE ES MI CODIGO...

Imports System
Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Public conexion As New OleDbConnection
Public Sub BD()
conexion.ConnectionString = "Provider=Microsoft.Jet.OleDb.4.0; Data Source=C:\Users\Omar Alviarez\Documents\db1.mdb"
conexion.Open()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Call BD()
Dim ds As New DataSet
Dim sel As String
sel = "Select * From Tabla1"
Dim adapterrrs As OleDbDataAdapter = New OleDbDataAdapter(sel, conexion)
adapterrrs.Fill(ds)
DataGrid1.DataSource = ds.Tables(0)
conexion.Close()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Call BD()
Dim ds As New DataSet
Dim sel As String
sel = "INSERT INTO Tabla1 (cedula,nombre,apellido,direccion,edad) " & "values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "')"
Dim adapterrrs As OleDbDataAdapter = New OleDbDataAdapter(sel, conexion)
adapterrrs.Update(ds)
'hata aqui ya tienes tu dataset cargado con los datos y para volcarlos en una grilla
DataGrid1.DataSource = ds.Tables("Tabla1")
conexion.Close()
End Sub
End Class