Os procedimentos correctos para se inserir via vb a password numa base de dados access não sei, pois costumo fazer isso no próprio access.
Para acessar a base de dados, depois de saber a password da mesma, adapte o seguinte exemplo:
Public Function ConexaoDados() As Connection
base = PstrCamDados & "mvdoctab.mdb"
Set dbDados = New ADODB.Connection
With dbDados
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("Data Source") = base
.Properties("Jet OLEDB:Database Password") = "password"
.Open
End With
End Function
PstrCamDados é o directório onde se encontra a base de dados que eu não obrigo que seja o mesmo da sua aplicação. Se no seu caso for pode substituir por App.Path
