ola wenas soy nuevo en esto y haber si me pueden ayudar en esto

como se hace para igualar una variable al contenido de un textbox?

por ejemplo creo un textbox y un boton y quiero que al darle al boton se abra la ruta del archivo escrita en el textbox

por ejemplo

Private Sub Command1_Click()
Dim ruta As String
ruta = Text1.Text ' aqui pongo laa ruta de un txt por ejemplo C:\ola.txt
Shell ("notepad.exe ruta")
End Sub


pero nada no rula

thx de antemano