Problemas con shell (Solucionado)

[Zeroql]

buenas tardes tengas todos.
mi problema radica cuando voy a abrir un archivo por la fucion shell, pero no me abre lo que necesito.
aqui les dejo el code

Código (vb) [Seleccionar] Expandir

Private Sub nmuOpenReg_Click()
ruta = App.Path + "\Registro.txt"
Shell ("notepad.exe" & ruta)
End Sub

de ante mano muchas gracias.

[~~]

Código [Seleccionar] Expandir

Private Sub Form_Load()
Dim Ruta As String
Ruta = "notepad.exe" & " H:\hola.txt"
Shell (Ruta)
End Sub


Y ya esta

[Zeroql]

gracias EON

[~~]

De nada