Mensajes

No se si te he entendido bien, pero CREO que lo que quieres es, utilizar el textbox a modo de consola ms-dos.

Si eso es lo que quieres (que no lo se), prueba con:

Código [Seleccionar] Expandir

sub boton_click()
dim texto as string

texto = textbox1.text

shell(texto)
end sub