Visual Basic - Compactar BD

Al cerrar mi programa le digo que compacte la base de datos en la que esta basado el programa, y me sale un mensaje diciendo que la base esta en uso, y que no se puede. La base de datos esta protegida con contraseña, pero ya se la pongo y no hace nada, tb esta puesto al comienzo del codigo "mibase.close", pero sigue diciendo lo mismo, espero que alguien me sepa decir cual es el problema o como se hace.

Gracias.

Hola !!! Alguna vez tuve un problema asi y lo que hice fue cerrar en codigo(ovbiamente ) todos mis recordsets y al final cerrar la base de datos con un close db podrias intentar esto lo que sugiero tambien es que por cada consulta que realices pongas una instruccion de retardo (un do events) para que el programa no realice nada hasta que termine de ejecutarse cada consulta