por q no hacer:
Imports System.Data.OleDb
Imports System.Data.SqlClient
Private Function ConexionAccess() As OleDbConnection
Dim cnn As OleDbConnection
cnn = New OleDbConnection()
cnn.ConnectionString = "File Name=f:\usuario.udl"
Return cnn
End Function
Creas udl q apunte a tu bd access
el udl s ecrea creando un .txt por ejemplo y le cambias la extenion y luego en las propiedades le pones q el proveedor es el microsoft jet 4.0 y q db es y listo |