Visual Basic - Abrir la b de d con contraseña desde visual

Tengo la base de datos en access bloqueada con contraseña y para que el usuario del programa no la manipule necesito abrirla desde el visual para poder grabar los datos.
Le agradezco mucho a quien me desee colaborar.

Set Cn = New ADODB.Connection
with cn
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\datos.mdb;Jet OLEDB:Database Password='x'"
.Open
End With

suerte

Gracias Gon, voy a probar y luego te comento