Guarda che è semplicissimo, concatena una stringa costante (nella forma "mia stringa costante") ad una variabile, con l'operatore &.

Ad esempio:

cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & variabile_che_contiene_il_percorso_al_db & ;User Id=admin;Password=;"

HTH!

tK