Pedido de Ajuda em atualizar caixa de texto após inserir registro

Oi a todos
Estou aqui novamente a precisar dos colegas
Tenho esse Exemplo em anexo o AtualizarCaixaTexto
Na hora que eu insiro um novo registro no form_vendas e ao fazer uma venda e a medida em que for que for adicionando um produto novo no Form frm_vendaDealhes preciso que a Caixa de texto de nome: txtDecimo, e cor vermelha colocada no form frm_vendas,  seja atualizada também em tempo real a cada inserção de um novo produto

a caixa de texto tem ser atualizada a cada novo produto inserido naquela venda

Porque do jeito que está caixa de texto só atualiza se eu fechar o banco de dados e abrir ele de novo e depois clicar pra ir para o último registro

No aguardo dos colegas

Ao clicar no botão novo registro

Código:

DoCmd.GoToRecord , , acNewRec
me.txtDecimo.background=vbred

Não amigo não é assim, txtDecimo tem que ir atualizado automaticamente após ir inserindo um item de cada vez no sub form
ou seja Fazendo uma nova Venda, a medida que vfor inserindo produtos na venda do cliente ir atualizando a txtDecimo entendeu

Oque eu preciso é isso:



Tenho esse Exemplo em anexo o AtualizarCaixaTexto
Na hora que eu insiro um novo registro no form_vendas e ao fazer uma venda e a medida em que for que for adicionando um produto novo no Form frm_vendaDealhes preciso que a Caixa de texto de nome: txtDecimo, e cor vermelha colocada no form frm_vendas, seja atualizada também em tempo real a cada inserção de um novo produto

a caixa de texto tem ser atualizada a cada novo produto inserido naquela venda

Porque do jeito que está caixa de texto só atualiza se eu fechar o banco de dados e abrir ele de novo e depois clicar pra ir para o último registro

No aguardo dos colegas

boas.....se me permitem

me.txtDecimo.background=vbred
me.txtDecimo.requery

Ou....

Forms!Frm_venda!txtdecimo.requery
Forms!Frm_venda!txtDecimo.background=vbred

Não silvio acho que tinha me expressado errado o objetivo é na resposta do Crysostomo que reeditei agora de uma olhadinha  por gentileza
atualizar e ir mostrando oresultado que nela contem com a expressão
txtDecimo = Replace(Format(Forms!frm_vendas!frm_vendasDetalhe!Texto13.Value, "0.00"), ",", ".")

essa caixa de texto tem que retornar em tempo real o rsultado a cada inserção de produtos na venda sem que eu tenha que fechar o form e abrir de novo entendeu agora amigão, espero que dessa vez eu tenha sido mais expcífico e explixadomelhor

pergunto....

Qual a finalidade/função dessa caixa de texto....txtdecimo ?

A finalidade dessa caixa de texto é de mostrar o valor calculado na expressão
txtDecimo = Replace(Format(Forms!frm_vendas!frm_vendasDetalhe!Texto13.Value, "0.00"), ",", ".")

essa expressão está no evendo no atual do form principal e está funcionando direitinho ocáculo

o Onunico problema é que tenho que fechar o formulário e barir de novo o formulário pra que o valor da expressão apareceça
e  eu quero que o valor dessa expressão seja atualizado a cada novo produto insrido no formulário frm_vendadetalhes

se eu ainda não fui bastante claro tentaei ser de acordo com que estiverem de dúvidas
estou a disposição

no aguardo

Olá Roberto,

Entendi a sua necessidade.
Já baixei seu exemplo e vou fazer esse ajuste conforme pediu, e ja disponibilizo em seguida,

Att,

Alexandre Fim

Ok Amigo desde já meus agradecimentos
no seu aguardo

Roberto,

Eu fiz um sistema de vendas para um membro aqui do grupo (não me lembro quem...kk), e eu acho que poderia te ajudar.

- Tela de vendas:


VEja se te interessa.
E ai vc faz as mudanças que vc achar necessárias no layout e tudo mais. Fica a seu critério

Segue em anexo.

Att,

Alexandre Fim

O exemplo que voce disponibilizou é muito bom, posso até aproveitar em um outro projeto, mas no momento eu preciso qque se resolva a minha necessidade que está discriminada na mensagem 1 e 7o Projeto segue esse objetivo e tem que ser assim

mas muito obrigado pela tentativa