ATIVAR FORM

USUARIO.EXCLUIDOS 11/03/2005 17:01:45
#72455
Tenho dois forms

form1 e form2

Queria abrir o form2 assim que o form1 for carregado, ate ai bzl

no evento load do form1 eu colocaria
form2.show

mais como deixar o form 2 sobre o form1, e nao deixar o usuario alternar para o form1.

Obrigado.
USUARIO.EXCLUIDOS 11/03/2005 17:22:57
#72460 Resposta escolhida
Olá, seria isso?

Private Sub Form_Load()
    Form2.Show 1
End Sub


Oks,
Rafael Portal
USUARIO.EXCLUIDOS 11/03/2005 18:08:25
#72473
Finalize o topico RUINAS...
USUARIO.EXCLUIDOS 11/03/2005 18:11:16
#72476
Não sei se é isso mais vou tentar,
Obrigado.

Eu sempre finalizo os meus topicos, depois que eu os vejo,
mais mesmo assim obrigado pela dica!!!
USUARIO.EXCLUIDOS 11/03/2005 18:14:03
#72477
Não seria isso nao...

o que eu quero é que o form1 ainda continue aparecendo, ai vem o form2 por cima do form1, mais nao deixando ativar o form1 sem gerar a ação.
USUARIO.EXCLUIDOS 11/03/2005 18:20:21
#72480
Cara do jeito que o RAFAEL falou...... o FORM1... CONTINUA APARECENDO...... e vem o FORM2... por cima do FORM1........ E NÃO DEIXA ATIVAR O FORM1... E NÃO DEIXA GERAR NENHUMA AÇÃO NO FORM1.........


Vc deve não ter entendi.....
USUARIO.EXCLUIDOS 11/03/2005 18:26:43
#72484
aqui na apareceu isso pra mim nao, quando eu excuto, ele abre o form2 e depois que fecho o form2 que o form1 aparece, coloquei os dois localizados em pontos diferentes da tela.
USUARIO.EXCLUIDOS 11/03/2005 18:32:28
#72486
primeiro lugar... o form1 tem de ser o primeiro e ser aberto... PROJECT propriedades....... depois no evento... FORM1 ACTIVATE!!! VC COLOCA.....

FORM2.SHOW 1 'O um se refere ao fato dele ser MODAL.... e não vai dexar... clicar no form1... enquanto ele estiver aberto.. mas mesmo assim.. o form1 vai ficar lá atrazzzzzzz
USUARIO.EXCLUIDOS 11/03/2005 18:39:53
#72487
entao
o form que abre primeiro é o form1.
o form1 tem no evento load a comando "form2.show 1"

Tenta fazer vc mesmo.
USUARIO.EXCLUIDOS 11/03/2005 18:45:55
#72489
o form 1 é o primeiro a ser aberto

codigo form1

Dim abriu As String

Private Sub Form_Activate()

'se precisar abrir só uma vez....

If abriu = "Sim" Then

Else
abriu = "Sim"
Form2.Show 1

End If

End Sub
USUARIO.EXCLUIDOS 11/03/2005 18:47:20
#72490
Entendeu?
Página 1 de 2 [11 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar