MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Dificuldade com Função Dirty

    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 699
    Registrado : 23/08/2010

    [Resolvido]Dificuldade com Função Dirty Empty [Resolvido]Dificuldade com Função Dirty

    Mensagem  Mylton em 24/2/2019, 17:55

    Boa tarde
    Nessa parte tive a necessidade de introduzir mais um form na rotina.
    Abro o form exame fisico.
    Escolho um processo na lista.
    Abro form tornozelo d, ou esquerdo ou antebraco.
    O id Processo acompanha nesses forms.
    Quando escolho outro form e ID Processo não acompanha.

    Utilizei Dirty
    Form Tornozelo D e E
    Private Sub Form_Dirty(Cancel As Integer)
    ' ao preencher qualquer campo, o Id do Exame fisico é preenchido.
       Me.IdProcesso = Forms!Frm_ExameFisico!IdProcesso
       Me.IdExameFisico = Forms!Frm_ExameFisico!IdExameFisico
    End Sub


    Utilizei Dirty
    Form demais forms Tornozelo D e E
    Private Sub Form_Dirty(Cancel As Integer)
    'ao preencher qualquer campo, busca-se o id
       Me.IdProcesso = Forms!Frm_ExameFisico!IdProcesso
       Me.IdTornozeloE = Forms!Frm_TornozeloE!IdTornozeloE
       Me.IdExameFisico = Forms!Frm_TornozeloE!IdExameFisico
    End Sub


    Precisava que o IDProcesso acompanhasse em todos os forms.

    Alguém pode dar um help?
    Obrigado.
    Mylton
    Mylton
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 699
    Registrado : 23/08/2010

    [Resolvido]Dificuldade com Função Dirty Empty Re: [Resolvido]Dificuldade com Função Dirty

    Mensagem  Mylton em 25/2/2019, 00:20

    Resolvido
    Modifiquei a codificação nos comandos para:
    'relacionando os registros
    Forms!Frm_AntropometriaTornozeloD!IdTornozeloD.Value = Me!IdTornozeloD.Value
    Forms!Frm_AntropometriaTornozeloD!IdExameFisico.Value = Me!IdExameFisico.Value
    Forms!Frm_AntropometriaTornozeloD!IdProcesso = Me.IdProcesso


    Obrigado.
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6285
    Registrado : 15/03/2013

    [Resolvido]Dificuldade com Função Dirty Empty Re: [Resolvido]Dificuldade com Função Dirty

    Mensagem  ahteixeira em 25/2/2019, 08:13

    Olá Mylton,

    Obrigado pelo retorno, o fórum agradece.

    Abraço

    Conteúdo patrocinado

    [Resolvido]Dificuldade com Função Dirty Empty Re: [Resolvido]Dificuldade com Função Dirty

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/8/2019, 13:00