Dim conn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=percorsotuodb"))
        Dim cmd As New OleDb.OleDbCommand
        cmd.Connection = conn
'Diciamo che stiamo chiamando una stored all'interno del db
        cmd.CommandType = CommandType.StoredProcedure
'Il nome della sored
        cmd.CommandText = "tuastored"
'Qui aggiungi tutti i tuoi parametri per eseguire la stored
        cmd.Parameters.AddWithValue("nomeparametro1", valoreparametro1)
       cmd.Parameters.AddWithValue("nomeparametro2", valoreparametro2)
'verifica che la connessione sia aperta altrimenti la apri
        If conn.State = ConnectionState.Closed Then conn.Open()
'Esegui la queri e invii irisultati in un datareader
        Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader