Visual Basic - ayuda a colocar clave a la bd

buen dia, tengo lista un pequeño programa que maneja bd de access, ahora bien necesito colocar password a la bd, dentro del programa utilizo datagird, adodc, flexgrid y datareport por codigo, me pueden dar la acesori para hacerlo de la mejor manera y que pasos debe seguir o si tienen algun link para guiarme, les agradezco

gracias

señores ya modificado ciertas cosas y va ejecutandose pero elproblema es con los adodc me muestra un error:
no se puede iniciar la aplicacion. Falta el archivo de informacion del grupo de trabajo o bien esta abierto en modo exclusivo por otro usuario

que tengo que hacer por favor, gracias

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "NOMBRE BASE DATOS.MDB;" & _
"Persist Security Info=False;" & _
"Jet OLEDB:Database Password=123456"
Adodc1.RecordSource = "NOMBRE DE TU TABLA"
Adodc1.Refresh

Un Saludo.