[Resolvido]Abrir formulario com tempo marcado

Bom dia, estou com um formulário inicial ode aparte desse preciso abrir um outro após 1 segundo depois que o formulário inicial for aberto abra o segundo formulario.
ja conseguir abri usando o evento timer, mas eu queria um codigo funcione na função ao carregar do formulario principal.

Eriberto,

Crie um módulo com esse código:

Código:

Public Function Pause(NumberOfSeconds As Variant)
On Error GoTo Err_Pause
   
    Dim PauseTime As Variant, Start As Variant
   
    PauseTime = NumberOfSeconds
    Start = Timer
    Do While Timer < Start + PauseTime
    DoEvents
    Loop
   
Exit_Pause:
    Exit Function
   
Err_Pause:
    MsgBox err.Number & " - " & err.Description
    Resume Exit_Pause
   
End Function

Agora ao carregar de seu primeiro formulário insira uma linha antes de chamar o seu segundo formulário:

Código:

Pause 1

Sucesso ....


Abraços,

Uilson obrigado pela atenção, mas ainda estou com o mesmo problema, o formulário abriu mais ainda esta abrindo por trás do formulário principal.. preciso que lel abra na frente do formulário principal.

Eriberto,

Creio que você está tentando fazer isso com o formulário de login. É isso???



Abraços,

Correto ...eu abro um formulário principal e me seguida quero abrir o formulário de login sobre o principal
mas quando chamo formulário de login ele abre portras do principal.

tentei chamar no evento timer mas a tela fica piscando o tempo todo e isso incomoda....vc tem uma solução para isso....?

Eriberto,

Já apanhei muito com isso também. Até por isso acertei no alvo.

Se possível disponibilize seu bd aqui ou me envie por e-mail uilsonbrasil@hotmail.com

Hoje meus sistemas de login já abrem em tela cheia sem a necessidade de fundo. Os objetos são movidos para o centro ao abrir o formulário.


Dê uma olhada no anexo ...


abraços,

Veja esse modelo também ...


Chamo o formulário principal após realizar o login ...

Uilson parceiro... vou te disponibilizar um parte do banco on estou criando os formularios... o motivo de poder te postar o banco completo é porque estou usando como BackEnde  o sql server 2008e o access como FrontEnde.mas da pra vc ter uma noção de como quero fazer.

Gostei desse ultimos exemplos que vc postou o video...vc tem algum bd exemplo pra me disponibilizar.
meu email é eribertomovecon@gmail.com

Amigão,

Vou verificar aqui ...

Aproveite e baixe esse meu aplicativo: http://maximoaccess.forumeiros.com/t16540-access-media-player-activex-windows-media-player

E se possível deixe seu comentário.


Abraços,

Bom dia meu grande amigo uilson, pois parceiro esse seu sistema é fabuloso, inclusive ja estava com ele instalado na maquina aqui... tentando acessar o codigo para tentar adaptar o sistema de login a minha aplicação, não estou conseguido acessar, vc tem alguma dica de como eu posso fazer para acessar o mesmo... Também quero lhe pela grande criação que é essa aplicação.

Muito obrigado pela ajuda companheiro Uilson... fazendo uma analise mais aprofundada no seu exemplo, pude perceber que vc utilizou uma macro para chamar os formularios.... aqui pra nós tento evitar o maximo o uso de macros em minhas aplicações... mas nesse caso tive que ceder.. seguri seu exemplo e deu tudo certo... muito grato pela ajuda... sucesso parceiro.

Eriberto,

Em algumas situações - como nesta por exemplo - ainda utilizo de macro pela sua flexibilidade.


Abraços,