Visual Basic - Encontrar una BD en directorio

Como puedo encontrar una BD en el disco duro
y despues direccionar mis data al path.
lo mismo para el archivo de ayuda.

o saber en que directorio esta mi programa y despues asi direccionarlo.

De antemano gracias !!!

Si tienes la base de datos en el mismo directorio que el programa usa

basesdedatos = App.Path & "\nombre.mdb"

ahora si lo tienes en otro directorio usa una variable que almacene el String y usa el Common Dialog para ubicarla..

Pero es que tengo el .exe y quisiera una rutina
para buscarla ya que no se donde el usuario vaya a instalar el programa.

Edu te lo ha dicho bien, pero si lo quieres más comnplicado o perfecto, ahí llevas:

Para una base de datos que se llama PEPE y un repor que se llama ANDAYA

Declaraciones:
Dim DatabasePath$
Dim DatabaseName$

Form_Load()
DatabasePath$ = App.Path
DatabaseName$ = AddPath$(DatabasePath$, "PEPE.MDB")
End Sub

Function AddPath (Path$, DatabaseName$) As String
If Mid$(Path$, Len(Path$), 1) <> "\" Then
Path$ = Path$ & "\"
End If
AddPath$ = Path$ & DatabaseName$
End Function

Para llamar al repor:
Sub Command1_Click()
Screen.MousePointer = HOURGLASS
´El control repor se llama rptPrint
rptPrint.Destination = 0
rptPrint.DataFiles(0) = DatabaseName$
rptPrint.ReportFileName = AddPath(DatabasePath$, "ANDAYA.rpt")
rptPrint.Action = 1
Screen.MousePointer = DEFAULT
End Sub

Y con esto puedes poner la base de datos en el directorio que quieras, que siempre la encontrará.

Después de esto es cuando tienes que hacer el EXE