MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    tempo ao Abrir o form

    avatar
    Convidado
    Convidado


    tempo ao Abrir o form Empty tempo ao Abrir o form

    Mensagem  Convidado 10/1/2017, 20:57

    boas
    tenho um form ( menu ) que ao abrir, pretendia que abrisse um outro form, mas com um tempo de espera... tipo 10 seg. ou seja ao efetuar o login ao bd este abre o form ( menu ) e pretendia que no final de 10 seg. abrisse um outro form que se encontra em popup...
    é possível ?
    tenho este comando ao carregar, inclusive coloquei após carregar mas o efeito é o mesmo abre logo...
    DoCmd.OpenForm "frmLSTAgendamento"
    Obrigado
    hiperjohn
    hiperjohn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 06/06/2013

    tempo ao Abrir o form Empty Evento No Timer

    Mensagem  hiperjohn 10/1/2017, 22:12

    Boa noite, amigo.

    No evento No Timer do formulário você pode digitar assim:

    Dim booAberto as Boolean

    If booAberto = False Then
       DoCmd.OpenForm "frmLSTAgendamento"
       booAberto = True
    End If


    Na propriedade do formulário Intervalo do cronômetro você coloca 10000
    Essa propriedade usa milissegundos, e 10000 milissegundos equivalem a 10 segundos.
    avatar
    Convidado
    Convidado


    tempo ao Abrir o form Empty Re: tempo ao Abrir o form

    Mensagem  Convidado 11/1/2017, 10:47

    boas
    Olha amigo funciona, mas com um senão . . . Fica sempre aparecendo... o intuito era só aparecer no inicio no final de se fechar não abrir... Abriria se clicase mos no botão de abertura do form... desta forma esta a a brir de 10 em 10 seg.
    Obrigado
    hiperjohn
    hiperjohn
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 06/06/2013

    tempo ao Abrir o form Empty Re: tempo ao Abrir o form

    Mensagem  hiperjohn 11/1/2017, 15:04

    Faça assim. Coloque num módulo a variável booAberto:

    Public booAberto as Boolean

    No evento No Timer do formulário vai ficar assim:

    If booAberto = False Then
      DoCmd.OpenForm "frmLSTAgendamento"
      booAberto = True
    End If


    Abraços

    Conteúdo patrocinado


    tempo ao Abrir o form Empty Re: tempo ao Abrir o form

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 08:06