Visual Basic - VB y contraseña Access

Alguien sabría explicarme como poder acceder a una base de datos access (mdb) desde una aplicación en vb5, teniendo la bdd un contraseña.¿Qué código tengo que introducir para que pueda añadir o borrar registros en las tablas?

Para abrir una base de datos Access que tiene contraseña se debe especificar el parámetro "connect" de la función OpenDatabase con el valor "MS Access;pwd=xxxxxx", donde "xxxxxx" es la contraseña. Por ejemplo, podríamos hacer una llamada así:

Set bd = OpenDatabase("c:\ruta\basedatos.mdb", , , "MS Access;pwd=micontraseña")

Éste es el código que utilicé yo:
Set aFarmacia = DBEngine.Workspaces(0).OpenDatabase(App.Path & "\Farmacia.mdb", False, False, ";pwd=LA CLAVE")

Espero que te sirva.