Pessoal alguem sabe pq acontece isto!, meu Update não da um Update e sim duplica o registro no banco como se fosse um Insert (Rs.Addnew e depois um Rs.Update), mas estou usando só o Rs.Update como no código abaixo.
Rs_Alterar!codigo = txt_cod.Text
Rs_Alterar!descricao = txt_desc.Text
Rs_Alterar!categoria = txt_cat.Text
Rs_Alterar!familia = txt_fam.Text
Rs_Alterar!formato = txt_for.Text
Rs_Alterar!linha = txt_lin.Text
Rs_Alterar!pt_com = txt_pct.Text
Rs_Alterar!cx_com = txt_cxc.Text
Rs_Alterar!pacotes = txt_pac.Text
Rs_Alterar!cb_caixa = txt_cbc.Text
Rs_Alterar!cb_pacote = txt_cbp.Text
Rs_Alterar!cb_produto = txt_cbpr.Text
Rs_Alterar.Update
'limpa os campos após ter feito a alteração
Call LimpaCampo