Visual Basic - Cambiar el Databasename en control Data por Textbox

Hola. Pues me gustaria que el usuario cambie la base de datos del control Data. La ruta la obtengo en un formulario a travez de un CommonDialog, y guardo la direccion en una base de datos (para que se pueda usar a futuro). En otro formulario obtengo en un textbox la direccion guardada de forma correcta, el problema es cuando quiero usar ese .text como databasename obtengo un error 3044: "'(Aqui pone bien la ruta del archivo, el archivo y la extencion) No es una ruta de acceso valida~"

Lo tengo como codigo de prueba es esto:

Private Sub Command1_Click()
Dim r As String
r = txtruta.Text
Data1.DatabaseName = r
Data1.RecordSource = Tabla ' no se si esto sea necesario....
Data1.Refresh ' esta linea me genera el error, sin ella simplemente no hace nada ....
'Data1.Recordset.MoveFirst
End Sub