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

Ok Amigo desde já meus agradecimentos
no seu aguardo

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