Hola
La solucion es muy sencilla necesitas un adaptador para conectar con mdb desde .net mas adelante te dejo codigo de como tienes que hacerlo tambien vas a tener que agregar referencias para que no tengas problemas.
en un modulo agregas el codigo siguiente
Imports System
Imports System.Data.OleDb
Imports XtremeReportControl
Public Function CadenaConeccion() As String
Dim csb As New OleDbConnectionStringBuilder
csb.Provider = "Microsoft.ACE.OLEDB.12.0"
csb.DataSource = App_path() & ".mdb"
Return csb.ConnectionString
End Function
y en tus formularios colocas esto
Dim scon As String = CadenaConeccion()
Dim sel As String = "Select * From Tabla Where Condicion='" & Condicion & "'"
Using con As New OleDb.OleDbConnection(scon)
Dim cmd As New OleDb.OleDbCommand(sel, con)
con.Open()
Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader
Try
While dr.Read
Txt.Text = dr(0).ToString
End While
Catch ex As Exception
MessageBox.Show("Error: " + ex.Message, "Empresa", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finally
If Not (dr Is Nothing) Then
dr.Close()
End If
If con.State = ConnectionState.Open Then
con.Close()
End If
End Try
End Using
con ese codigo conectas y consultas suerte
