caros amigos, gostaria de saber como faço para chamar uma aplicacao atraves de outra ex.:

 

 

 tenho Menu.exe e Cliente.exe

 

 

 Executo Menu.exe em seguida em um Command1 chamo Cliente.exe

ja tentei fazer isso sando o comando "Shell", mais a aplicacao fica tipo minimizada, gostaria de saber se tem outro meio.

Bem, existe outro meio sim, mas com relação a aplicação ficar minimizada, isso se resolve com parâmetros do comando Shell:

 

Resp = Shell("SuaAplicação.exe", vbNormalFocus ou vbMaximizedFocus)

 

Uma outra forma é usar a API do Windows WinExec:

 

Public/Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
Public/Private Const SW_SHOW = 5
Public/Private Const SW_SHOWMAXIMIZED = 3

Private Sub Command1_Click()

    Call WinExec("C:WindowsCalc.exe", SW_SHOW)

End Sub

Isso deve resolver o seu problema.

 

Um abraço,

Sandro.