Codigo Para Ejecutar Un Programa

[luciano]

. .saludos

-----------------

Colcoa un command1 y un text

Código:

Private Sub Command1_Click()
Shell Text1.Text, vbMaximizedFocus
End Sub

Private Sub Form_Load()
Text1 = "notepad.exe"
Command1.Caption = "abrir"


End Sub