FoxPro/Visual FoxPro - como sumar un textbox de varios datos

Buen dia comunidad

Alguien me puede ayudar con esto...

Quiero hacer una suma en en texbox de varios datos, dentro de un formulario...

ejemplo:

codigo articulo Total
P1 lapiz $5.00
P1 cuaderno $2.00
P2 clips $3.00

Que el dato a sumar sea total, pero que sume por codigo, es decir que sume todos los P1(o segun el codigo que eliga)

que en total me salga en un texbox $7.00 y que se guarde todo en una misma tabla.

Creo, que necesita filtrar primero y despues realizar una suma.

Gracias de antemano

No está muy claro si va ha ir sumando a manera
que le ingresan datos al form ,o es un form que
va a capturar datos y usa un grid o solo texts.

*En el supuesto que tenga un Indice desde el Dataenvironment

evento Init del form
select mitabla1
public cod
store space(8)to cod
go top
cod=Thisform.Text6.Value
Set Filter to Alltrim(codigo)=Alltrim(cod)
clear
Sum (total)to Thisform.Text6.Value