[Resolvido]Atualizar campo de tabela com campo criado em Formulário

Estou tentando atualizar uma tabela com um dado criado no formulário.
O sistema é bastante simples, sou iniciante.
Trata-se de um sisteminha de armazenamento de compras em supermercado.
Consta apenas de duas tabelas.

Uma delas contem a compra onde registro só os campos:

data (a data da compra) precisa digitar é a chave
qtde de itens (esse campo é criado pelo formulário - contém a qtde de registros da 2a tabela, de itens da compra
valor (esse campo é criado pelo formulário - contém a soma dos valores dos itens por suas quantidades
imposto (esse campo é digitado)
percentual do imposto (esse campo é criado, mas desnecessário).

a 2a tabela contém os itens comprados,
contém os campos
data (obtido da digitação do campo do formulário)
descrição do item (esse campo pode ser digitado ou obtido em tabela
qtde (esse campo é digitado)
valor unitário (esse campo é digitado)

Ao encerrar a compra clicando no botão "Salvar a Compra" o sistema cria os registros nas duas tabelas, mas não atualiza o valor da compra na tabela principal. Esse campo deveria ser atualizado com o campo criado no formulário.

Estou usando as instruções:

Private Sub SalvarCompra_Click()

On Error GoTo Err_bt_NovoRegistro

   Me.Refresh
   
 '  Dim db As DAO.Database
   'Set db = CurrentDb()
   CurrentDb.Execute "UPDATE tb_compras SET total = '" & Me.TotVal & "' WHERE data = " & Me.data & ""
   
   DoCmd.GoToRecord , , acNewRec
   Forms!frm_compras!data.SetFocus
Exit_bt_NovoRegistro:
   Exit Sub

Err_bt_NovoRegistro:
   MsgBox Err.Description
   Resume Exit_bt_NovoRegistro
   
End Sub

Mas infelizmente dá erro de sintaxe e não atualiza.
Segue o sisteminha zipado

Bom dia Luciano,

Não veio o arquivo zipado, mas tente isso:

CurrentDb.Execute "UPDATE tb_compras SET total = '" & Me.TotVal & "' WHERE data = #" & Format(Me.Data, "mm/dd/yyyy") & "#"

Att,

Alexandre Fim

Maravilha. Deu certo.
Aproveitando sua boa vontade peço uma outra explicação sobre a linha de comando que me passou.
Você colocou o # antes e depois do campo com format.
Isso você fez por ser um campo DATE ou em toda pesquisa terei que fazer isso?

Sobre o arquivo zipado, não sei como nem porque não foi. Devo ter errado alguma coisa.
Esta é minha segunda vez que uso o sistema.

Veja a mensagem Nº2 deste tópico:

https://www.maximoaccess.com/t1533-funcao-dlookup-explicacao


Também deve utilizar a sala de tutoriais (Apostilas), só assim você vai crescer em conhecimento para os seus trabalhos;

https://www.maximoaccess.com/f2-repositorio-de-tutoriais-apostilas