Atualizar tabela com comando em botão no forrmulario

Pessoal bom dia!

Mais uma vez recorro aos feras desse fórum para mais uma ajuda
É o seguinte, tenho uma tabela com o nome TB_MOV31 e outra com o nome do TB_CONTRATO
TB_MOVI31
Codigo
Data
Peso
Nome
Contrato

TB_CONTRATO
Codigo
Data
Peso
Nome
Contrato

O que eu preciso de ajuda é que fosse criado um código/comando, onde vá na tabela TB_CONTRATO, no campo contrato e compare se a tabela TB_MOVI31 tem o mesmo numero de contrato, se for positivo ai preenche o o campo NOME da tabela TB_MOVI31, com os dados do campo NOME da tabela TB_CONTRATO.

Lembrando que essa tabela TB_CONTRATO, terá sempre vários contrato onde todos terá que ser

Bom dia.
Pega esse codigo

Dim db As Database
Set db = CurrentDb
Call db.Execute("update pecas set percentual = '" & Me!TxtvalorAalterar.Value & "' where IdGrupo= " & Me.cboGrupo)
Msgbox" Atualização em demanda feita com sucesso"
End Sub
Ele vai verificar e atualizar todos p3odutos que tenho a mesma chave.
É preciso ter relação de tabela