Ejecuta un archivo .exe

Para ejecutar un archivo .exe puedes utilizar la siguiente funciòn:

Dim resultado As Integer
resultado = Shell("C:\directorio\archivo.exe",1)