Visual Basic - Acces y data control

Tengo una base de datos con contraseña, pero nose como hacer para que el date tambien pase la contraseña, porque no me deja abrir la base.

Hola! Para abrir una base de datos access (version 2000) la propiedad del adodc "ConnectionString" tendria que ser asi:

ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & <tubasededatos> & ";Jet OLEDB:Database Password=" & <tucontraseña> & ";Persist Security Info=False"

donde dice <tubasededatos> va el nombre de la base con la ubicacion completa.Ej: "c:\sistema\clientes.mdb" y donde dice <tucontraseña> bueno la contraseña que hayas elegido para tu base. Presta atencion a los ;
Espero que te sirva. Cualquier duda escribime.Saludos.

No utilice nunca DAO pero intenta agregando esto en el evento load del form donde tenes el Data Control:

Data1.Connect = "<tubasededatos>pwd=<tucotraseña"

donde dice <tubasededatos> va el nombre de la base con la ubicacion completa.Ej: "c:\sistema\clientes.mdb" y donde dice <tucontraseña> bueno la contraseña que hayas elegido para tu base.
En la ventana de propiedades del Data control borra todo lo que tenga en la propiedad "DatabaseName".
Espero que te sirva. Cualquier duda escribime.Saludos.