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

    [Resolvido]Erro de preenchimento

    avatar
    robertonl
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 66
    Registrado : 21/12/2016

    [Resolvido]Erro de preenchimento Empty [Resolvido]Erro de preenchimento

    Mensagem  robertonl 28/9/2023, 01:47

    Boa noite.
    Deparei um um imprevisto, e já revisei todo o programa e não encontrei o possível erro.

    No Formulario Frm_Membro, ao clicar em pesquisar abre uma segunda tela que ao digitar o nome pesquisado, e encontrando este registro clico e ele preenche os dados no Frm_Membro, porém quando clico no registro ele retorna a um erro, pedindo para digitar valor no campo Tab_membro. Id_Codmembro.

    Nesta referida tabela o campo código deixei no formato texto, que será composto de  4 digitos, e os código deste registro se for abaixo de 1000, preenche o código com zero.

    Alguém mais experiente para poder ajudar nesta resolução
    Anexos
    [Resolvido]Erro de preenchimento AttachmentProjeto1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (279 Kb) Baixado 3 vez(es)


    Última edição por robertonl em 4/10/2023, 00:50, editado 2 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3871
    Registrado : 21/04/2011

    [Resolvido]Erro de preenchimento Empty Re: [Resolvido]Erro de preenchimento

    Mensagem  Marcelo David 28/9/2023, 14:00

    Olá Roberto, tudo bem?

    O erro pode estar aqui:

    Código:
    Private Sub Form_Load()
        DoCmd.GoToRecord , , acNewRec
        'Me.Id_DataIniMbo = ""
        Me.Id_DataIniMbo.Enabled = False
        Me.Id_DtNascMbo = ""
        'me.Id_PerBlqMbo = ""
        'Me.Id_AtualCad = ""
        Me.Id_AtualCad.Enabled = False
        Me.Id_PerBlqMbo.Enabled = False
        'Me.Cbo_SubGrleitor.Enabled = False
        'Me.Cbo_SubGrpMinistro.Enabled = False
        '-- variável que define a ação do formulário
        iCmd = 0
       
        'Função que bloqueia controles do form ativo
        'Call fnBlockControl(Me)
     

    End Sub

    Você está indo para um novo registro ao carregar o formulário. Então ele faz as validações de campos obrigatórios, pois está inclusive atribuindo valor
    ao campo Id_DtNascMbo (Vazio, mas ainda assim é um valor).

    Eu não entendi porque tem uma função para filtrar o formulário dentro dele próprio, uma vez que os filtros podem serem feitos na abertura.

    Código:
    Public Function CarregaDados(idDados As Integer)

        Me.Filter = "[Id_CodInt] = " & idDados & ""
        Me.FilterOn = True
        Me.Requery

    End Function

    Esse Me.Requery após a filtragem também fica estranho, uma vez que já está com a filtragem ativa, não é necessário reconsultar
    as informações além de que essa função CarregaDados (não sei a sua necessidade) não faz muito sentido, pois já há no access a
    possibilidade nativa de filtrar ao abrir, assim como fiz no duplo clique da caixa de listagem.

    Fiz algumas alterações:
    No evento ao carregar do Frm_Membro, comentei as linhas:
    DoCmd.GoToRecord , , acNewRec
    Me.Id_DtNascMbo = ""
    Pois é elas é que estão dando o problema

    No formulário Pesquisa_Membro, alterei o evento duplo clique da caixa de listagem para abrir o formulário Frm_Membro já filtrado, sem necessidade
    de usar a função criada de filtragem.

    Não entendi porque mantem o formulário Frm_Membro abeto, mesmo sem estar usando, melhor manter fechado e esomente abrir se precisar...

    Comentei todos os códigos que julguei desnecessários.

    Tente simplificar mais seus códigos, isso será muito útil para futuras manutenções.

    Como não conheço a real necessidade, apenas fiz alguns ajustes para servirem com sugestão.

    Teste por favor. Baixe aqui.



    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Erro de preenchimento Marcel11

      Data/hora atual: 21/4/2024, 23:11