Visual Basic - bases de datos con clave

hola, disculpen que moleste pero tengo un problema. si saben como hacer para que un archivo dbf de access que tiene una clave de acceso, se pueda abrir desde visual basic?, es decir para que el programa cuando abra la base de datos no muestre el mensje de error, sino que la habra de forma normal. gracias obviamente la clave la puse yo, es por seguridad, para que nadie la pueda abrir fuera del programa vb. . bye

Hola

Espero que esto te sirva:

Dim wrkJet As Workspace
Dim dbsM97 As Database
Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet)
Set dbsM97 = wrkJet.OpenDatabase("miBD.mdb", True, False, ";PWD=miContraseña")

Atte. Fdo. Fdez.