MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    Como fazer um formulário de consulta exibir uma mensagem quando a consulta não retorna um registro

    Compartilhe

    gordo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 10/10/2011

    Como fazer um formulário de consulta exibir uma mensagem quando a consulta não retorna um registro

    Mensagem  gordo em Ter 01 Jul 2014, 01:26

    A solução pode até ser simples, mas não estou conseguindo implementar. Também já pesquisei muito no google e não encontrei.

    Tenho um formulário com 3 botões para exibirem 3 consultas distintas:

    1) Registros pendentes de despacho
    2) Consulta de registros por data de autorização
    3) Consulta de registros por matrícula de funcionário

    Como é que eu faço para exibir uma mensagem, como por exemplo: "Nenhum registro encontrado!", quando as consultas não retornarem nenhum registro.

    Desde já agradeço!

    halmeida
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 07/08/2011

    Re: Como fazer um formulário de consulta exibir uma mensagem quando a consulta não retorna um registro

    Mensagem  halmeida em Sab 06 Set 2014, 14:15

    Você pode fazer da seguinte forma:
    Código:

    'incluir esta rotina no evento ao clicar do botão.
    if isnull(dlookup("Campo a ser procurado na tabela","Nome da tabela","Campo a ser procurado na tabela='" & me.SeuCampoNoFormulário & "'")) then
    msgbox "Nenhum registro encontrado"
    end if

      Data/hora atual: Dom 04 Dez 2016, 12:14