Visual Basic - Base de datos con contraseña

Necesito abrir una base de datos que esta protegida con una contraseña, que necesito hacer ???

Supongo que es una base de datos de Access; si no es así, la cosa puede cambiar. En fin, a la hora de abrir la BB.DD., debes especificar lo siguiente:

Dim BaseDatos As dataBase
Dim archivo As String
Dim pwd As String

archivo = "c:\directorio\archivo.mdb"
pwd = ... ´ Inicializar con el valor adecuado

Set MiBD = Workspaces(0).OpenDatabase(archivo, False, True, "MS Access;pwd=" + pwd)

si es con un data seria asi
Private Sub Form_Load()
With dtdatos
.DatabaseName = "C:\Db_Cursis.MDB"
.Connect = ";pwd=VILLA"
.RecordSource = "Datos_PR"
End With
end sub