Visual Basic - Password de acces

Le coloque un password a mi base de datos, pero no se ingresar a ella que debo colocar en la conexion de la base de datos, aqui les dejo como es mi conexion a mi base de datos

Sub main()
On Error GoTo buck:
Conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" _
+ App.Path + "\ORGANOS.MDB" + ";"
Conexion.Open
Load FrmAcceso: FrmAcceso.Show
Exit Sub
buck:
MsgBox "No se hallo conexion a un Base de Datos", vbInformation, "Lab.Essenfeld"
End Sub

Se le agradece la colaboracion y ayuda

Prueba con esto

Conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\ORGANOS.MDB;Persist Security Info=False;Jet OLEDB:Database Password=contraseña_de_tu_base_de_datos"
Conexion.Open

suerte

Muchas gracias si me sirvio XD