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

    [Resolvido]Módulo oculto?

    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1715
    Registrado : 23/01/2018

    [Resolvido]Módulo oculto? Empty [Resolvido]Módulo oculto?

    Mensagem  crysostomo 9/4/2018, 05:02

    colegas , bo  noite,  coloquei o seguinte codigo

    DoCmd.OpenForm "Sistig-Painel de Controle"
     If Time() >= #6:00:00 AM# And Time() < #12:00:00 PM# Then
       Call MsgBox("Bom Dia!", vbExclamation, "SISTIG")
        'Call MsgBox("Bom Dia!" & vbCrLf & "Hoje é " & Date, vbExclamation, "SISTIG") colocar assim na hora da demostração
    Else
       If Time() >= #12:00:00 PM# And Time() <= #6:00:00 PM# Then
           Call MsgBox("Boa Tarde!", vbExclamation, "SISTIG")
       Else
           Call MsgBox("Boa Noite!", vbExclamation, "SISTIG")
       End If
       End If
       DoCmd.Close acForm, "ABERTURA"

    se eu tirar a condição do TIME o codigo progress funciona normal se eu colocar como está ai ele não funciona fica como modulo oculto e tem hora que ele fala que não localiza a biblioteca, qual a solução disso ?
    tenho que deixar a saudação do programa.
    como inserir essa biblioteca?

    [Resolvido]Módulo oculto? Sem_ty30
    Noobezinho
    Noobezinho
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4126
    Registrado : 29/06/2012

    [Resolvido]Módulo oculto? Empty Re: [Resolvido]Módulo oculto?

    Mensagem  Noobezinho 9/4/2018, 11:54

    Crysostomo

    Veja a mensagem, ela diz que não consegue encontrar o projeto ou a biblioteca.

    Antes de tudo, tire os parenteses do Time(), veja que está separado os parenteses da palavra e teste.

    Verifique nas referências se está faltando alguma dll ou ocx.

    A função Time() pertence ao VBA, então deve ser outra coisa interferindo.

    Faça uma depuração do código VBA.

    Clique no menu depuração e depois na opção Compilar NomeDoteuAplicativo

    Se der erro, conserte, e repita até a opção ficar esmaecida,

    mostrando que todos os erros foram corregidos.

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1715
    Registrado : 23/01/2018

    [Resolvido]Módulo oculto? Empty Re: [Resolvido]Módulo oculto?

    Mensagem  crysostomo 9/4/2018, 14:05

    colega  bom dia , eu não posso tirar os parente, faz parte da linha de comando . Ele não está encontrando a biblioteca time , ja pesquisei e não consigo inserir essa biblioteca
    DamascenoJr.
    DamascenoJr.
    Moderador
    Moderador

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2829
    Registrado : 22/11/2016

    [Resolvido]Módulo oculto? Empty Re: [Resolvido]Módulo oculto?

    Mensagem  DamascenoJr. 25/6/2020, 02:39

    Crysostomo, como anda essa questão? Avançou?


    .................................................................................
    Ajude-se a ser ajudado, anexe seu projeto.
    Sempre tente entender o código,
    não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    crysostomo
    crysostomo
    Maximo VIP
    Maximo VIP

    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1715
    Registrado : 23/01/2018

    [Resolvido]Módulo oculto? Empty Re: [Resolvido]Módulo oculto?

    Mensagem  crysostomo 25/6/2020, 15:11

    Bom dia Damasco.
    Sim, resolvido!


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 20/6/2021, 02:30