¿Cómo lanzar un programa con SHELL desde VB6 y eliminar la barra de título de esa nueva ventana?
Tengo una pantalla con dos botones que permiten lanzar un programa cada uno y necesito ayuda para hacer que, al hacer click sobre algún botón, el programa lanzado sea ejecutado en una ventana maximizada y sin barra de título.
Hasta el momento sólo puedo controlar estos efectos en la aplicación lanzadora, pero es indispensable lograr lo mismo en las aplicaciones lanzadas.
Estoy utilizando el siguiente código en un botón, pero no logro el objetivo. Agradeceré mucho su ayuda:
Private Sub Activa_PROGRAMA_Click()
Dim ValorDeRetorno
ValorDeRetorno = Shell("c:\Program Files\programa.exe", vbMaximizedFocus)
Dim iEspera As Double
For iEspera = 1 To 1000000
Next iEspera
Dim Formularios As Form
For Each Formularios In Forms
Formularios.BorderStyle = 0
Next
End Sub