using System.Data.OleDb;
public class Bd
{
  private System.Data.OleDb.OleDbConnection Connection;
  public void Open(string FileName)
  {
    Connection = new System.Data.OleDb.OleDbConnection();
    Connection.ConnectionString = "Provider=microsoft.jet.oledb.4.0;Data Source=" + FileName + ";";
    Connection.Open();
  }
  public System.Data.DataTable GetTable(string Requete)
  {
    try
    {
      System.Data.DataSet DtSet = new System.Data.DataSet();
      System.Data.OleDb.OleDbDataAdapter AdapTContact = new System.Data.OleDb.OleDbDataAdapter(Requete, Connection);
      AdapTContact.Fill(DtSet, ((char)0).ToString());
      return DtSet.Tables[0];
    }
    catch (Exception Err)
    {
      throw Err;
    }
  }
  public void Close()
  {
    Connection.Close();
    Connection.Dispose();
    Connection = null;
  }
}
Example d'utilisation:
System.Data.DataTable Table;
Bd Bd = new Bd();
Bd.Open(@"Chemin\De\Votre\BaseDeDonnee");
Table = Bd.GetTable("select * from NomDeVotreTable");
Bd.Close();

Imports System.Data.OleDb
Public Class Bd
  Private Connection As System.Data.OleDb.OleDbConnection
  Public Sub Open(ByVal FileName As String)
    Connection = New System.Data.OleDb.OleDbConnection()
    Connection.ConnectionString = "Provider=microsoft.jet.oledb.4.0;Data Source=" & FileName & ";"
    Connection.Open()
  End Sub
  Public Function GetTable(ByVal Requete As String) As System.Data.DataTable
    Try
      Dim DtSet As New System.Data.DataSet()
      Dim AdapTContact As New System.Data.OleDb.OleDbDataAdapter(Requete, Connection)
      AdapTContact.Fill(DtSet, Chr(0))
      Return DtSet.Tables(0)
    Catch Err As System.Exception
      Throw Err
    End Try
  End Function
  Public Sub Close()
    Connection.Close()
    Connection.Dispose()
    Connection = Nothing
  End Sub
End Class
Example d'utilisation:
Dim Table As System.Data.DataTable
Dim Bd As New Bd()
Bd.Open("Chemin\De\Votre\BaseDeDonnee")
Table = Bd.GetTable("select * from NomDeVotreTable")
Bd.Close()