VB.Net y Access 2000

[luciopecador]

Hola compañero:
Voy a intentar mandarte un buen trozo de codigo con dos ejemplos de como se hace una conexion y demas en ado .net, ten en cuenta que en los siguientes ejemplos los objetos dataset y demas se declaran y se construyen con la instruccion new.
Si no te aclara un poco esto, mandame un mensaje y te mando otros ejemplos, un saludo

Dim datos As DataSet = New DataSet()

'ESTE ES UN EJEMPLO DE RELLENO DEL DATASET SIN USAR COMANDO, EL DATAADAPTER INCLUYE
'LA INSTRUCCION SQL Y LA CONEXION
conexion = New System.Data.SqlClient.SqlConnection()
conexion.ConnectionString = cadenaconexion
Dim adaptador As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter("SELECT * FROM EMP", conexion)
adaptador.Fill(datos, "empleados") 'RELLENO DEL DATASET
DataGrid1.DataSource = datos 'CARGA DEL CONTROL
DataGrid1.DataMember = "empleados" 'CARGA DEL CONTROL

'AQUI EL ADAPTADOR USA UN COMANDO, POR LO QUE HAY QUE DECLARAR LA CONEXION Y EL COMANDO
'COMO SIEMPRE, ADEMAS EL COMANDO TIENE UN PARAMETRO
Dim adaptador As New SqlClient.SqlDataAdapter()
Try
conexion = New System.Data.SqlClient.SqlConnection()
conexion.ConnectionString = cadenaconexion
comando = New System.Data.SqlClient.SqlCommand()
comando.Connection = conexion
comando.CommandType = CommandType.Text
comando.CommandText = "SELECT * FROM emp WHERE oficio=@oficio"
Dim param1 As New SqlClient.SqlParameter("@oficio", SqlDbType.VarChar, 20)
param1.Value = txtoficio.Text
comando.Parameters.Add(param1)
adaptador.SelectCommand = comando
datos.Clear()
adaptador.Fill(datos, "empleados")
DataGrid1.DataSource = datos
DataGrid1.DataMember = "empleados"
Catch x As Exception
MessageBox.Show(x.Message)
End Try