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

muchas gracias por compartir vuestros conocimientos

pero aun no se resolvio el problema por ejemplo si quiero matar un proceso y quiero que elimine el porceso del textbox

Private Sub Command1_Click()

Dim proceso As String
proceso = Text1.Text


For Each process In GetObject("winmgmts:"). _
ExecQuery("select * from Win32_Process where name='proceso'")
process.Terminate (0)
Next process

End sub

gracias de antemano

ops gracias pero em sigue sin funcionar 

Prueba esto:

    Public Sub KillProcess(ByVal processName As String)
 
    On Error GoTo ErrHandler
 
    Dim oWMI
    Dim ret
    Dim sService
    Dim oWMIServices
    Dim oWMIService
    Dim oServices
    Dim oService
    Dim servicename
 
    Set oWMI = GetObject(”winmgmts:”)
    Set oServices = oWMI.InstancesOf(”win32_process”)
 
    For Each oService In oServices
 
    servicename = LCase(Trim(CStr(oService.Name) & “”))
 
    If InStr(1, servicename, LCase(processName), vbTextCompare) > 0 Then
    ret = oService.Terminate
    End If
 
    Next
 
    Set oServices = Nothing
    Set oWMI = Nothing
 
    ErrHandler:
    Err.Clear
    End Sub

Esta función simplemente te cierra un proceso. Si quisieras cerrar el del notepad usarias:

KillProcess (”Notepad”)

Para cerrar el de algo escrito en text1 usarias:

KillProcess (text1.text)

Recuerda que no has de escribir la extensión, simplemente el nombre del exe a cerrar el proceso.