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


2 participantes

    Verificar formulário aberto e fechar!

    avatar
    infortech
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/01/2016

    Verificar formulário aberto e fechar! Empty Verificar formulário aberto e fechar!

    Mensagem  infortech 20/1/2016, 12:36

    Olá, Sou novo aqui comecei hoje, a questão é;
    Tenho um Form "login". No evento ao Carregar uso esse comando;

    Dim verForm As Boolean
    verForm = (SysCmd(acSysCmdGetObjectState, acForm, "F_VALIDAR") And acObjStateOpen)
    If verForm = True Then


    Else


    End If

    Ele verifica se o Form F_VALIDA está aberto até ai tudo bem, o que eu queria era modificar ele para que ao descobrir que está aberto ele feche, não a si próprio mais o outro formulário que está aberto!

    No caso; ao carregar o form LOGIN, verifica se o F_VALIDAR está aberto se estiver feche-o!
    Uilson Brasil
    Uilson Brasil
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1039
    Registrado : 23/04/2013

    Verificar formulário aberto e fechar! Empty Re: Verificar formulário aberto e fechar!

    Mensagem  Uilson Brasil 20/1/2016, 14:51

    Primeiramente seja bem vindo ao fórum.

    Ao carregar do formulário "LOGIN"

    Código:
    If CurrentProject.AllForms("F_VALIDA").IsLoaded Then 'Verifica se o formulário "F_VALIDA" está aberto
        DoCmd.Close acForm, "F_VALIDA"
    End If


    Sucesso!!!!!


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access
    avatar
    infortech
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 20/01/2016

    Verificar formulário aberto e fechar! Empty Re: Verificar formulário aberto e fechar!

    Mensagem  infortech 20/1/2016, 15:47

    Ok Uilson Brasil, vou alterar meu código!

    Conteúdo patrocinado


    Verificar formulário aberto e fechar! Empty Re: Verificar formulário aberto e fechar!

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 20/5/2024, 07:41