Visual Basic - Conexion de base de datos

Buenos Dias, estoy empezando en VB y quisiera saber como hacer una conexion a traves de un modulo con access, en este momentos se hacerla normalmente pero quiero ponerle contraseña a la base de datos y es ahi donde no se como accesarla. Si me pueden colaborar se los agradecere mucho.

Ahí te va....

Dim Ventas As ADODB.Connection
Set Ventas = New ADODB.Connection
'abrir el archivo sin clave
Ventas.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Archivos\Ventas.mdb"
Ventas.Open

'abrir el archivo con clave
Ventas.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Archivos\Ventas.mdb;Persist Security Info=False;Jet OLEDB:Database Password=88965"

En este ejemplo, la contraseña sería 88965, la cual puedes ponersela desde el Access, abriendo el archivo MDB en modo "exclusivo".. o algo así.... en el menú herramientas eliges establecer contraseña..

Espero te sirva

SALUDOS.