[Resolvido]Função DLast não funciona corretamente

Olá,

Tenho desenvolvido um pequeno aplicativo para uso pessoal. Trata-se de um fluxo de caixa. Nele estou usando um formulário principal e um subformulário. No formulário principal ao enviar a informação para o subformulário usei a função DLast, mas hora funciona; hora não funciona. Preciso de ajuda. Agradeço imensamente qualquer auxilio. Abaixo segue código e banco.

Código:


'Determinando o sinal do lançamento
If Me.TIPOLANC = 1 Then
ValorLancado = Me.VALORLANC
Else
ValorLancado = -Me.VALORLANC
End If

 'passa o foco para o sub form
    subLANCAMENTO.SetFocus
    
    'adiociona registo
    DoCmd.GoToRecord , , acNewRec
subLANCAMENTO!lanLANC = Me.lanLANC
subLANCAMENTO!lanFILIAL = Me.lanFILIAL
subLANCAMENTO!lanDOC = Me.DOCUMENTOLANC
subLANCAMENTO!lanHISTID = Me.HISTORICOLANCID
subLANCAMENTO!lanHIST = Me.HISTORICOLANC
subLANCAMENTO!lanDATA = Me.DATALANC
subLANCAMENTO!lanTIPO = Me.TIPOLANC
subLANCAMENTO!lanVALOR = ValorLancado
subLANCAMENTO!lanSALDO = DLast("[lanSALDO]", "tbl_fluxodecaixa_nivel4", "[lanLANC]=" & Me.lanLANC) + ValorLancado
  
    'mensagem
    MsgBox "Registo adicionado", vbInformation, ""


End Sub


https://mega.nz/#F!2UIm1bAS!NSliXEGLswz4ohZXlH398Q

Bem, depois de muito trabalho consegui resolver e entender o mecanismo.

Que bom que resolveu, Darlan!

Quando conseguimos através de nosso próprio

esforço, é mais gratificante, né?

Para que o tópico fique completo, poderia

colocar aqui a tua solução?

Alguém no futuro, poderá precisar !!

Boa sorte !

A minha intenção era gerar o saldo atual na própria tabela. Descobrir posteriormente que gravando na tabela e havendo uma alteração com data anterior ao o momento em que foi salvo o saldo não iria atualiza. Desta forma criei duas consultas e linquei no formulário gerando a informação corretamente.