COMO UNIR DOIS PROJETOS EM UM SO?

FEDERHEN 26/11/2010 10:52:27
#358267

No projeto principal você faz a chamada do projeto auxiliar
Exemplo:
Private Sub Command1_Click()
Call Shell([Ô]C:\pasta\matematica.exe parametro_para_acessar_projeto_auxiliar[Ô], vbNormalFocus)
End Sub


No projeto auxiliar, no primeiro formulário a ser carregado, você coloca o sequinte código no LOAD:
If command <> [Ô]parametro_para_acessar_projeto_auxiliar[Ô] Then
MsgBox [Ô]Projeto não foi acionado a partir do módulo principal![Ô]
End
Endif

Isso faz com que o projeto auxiliar teste se o parametro é o esperado, e se não for exibe uma mensagem e fecha o projeto.

FERNANDOMOREIRA 10/01/2011 15:36:30
#361762

Ok agradeço, realmente é isso ai q eu precisava, mas tem um probleminha só, logo no formulário de login eu utilizava uma variável publica com o nome do aluno, que seria utilizado durante as aulas que prosseguiriam, mas agora tenho que pensar como fazer isso.

FEDERHEN 10/01/2011 15:50:08
#361765

Tem duas formas de passar a informação do [Ô]nome do aluno[Ô]
1) Gravar o nome em um arquivo TXT e no load do outro projeto fazer a leitura;
2) Passagem por parâmetro:

no projeto que faz a chamada:
SHELL [Ô]c:\pre_vestibular\matematica.exe PARAMETRO[Ô], vbNormalFocus

no load do projeto chamado:
aluno = COMMAND

Obs: Se você já está utilizando o artificio de parámetros, pode fazer uma concatenação, utilizando os primeiros n bytes para uma finalidade e os n bytes seguintes para outra finalidade.




é importante fechar os tópicos e definir qual resposta melhor ajudou a esclarecer sua dúvida.
Isso pontua para quem ajudou.