algebric summ with a pair of values

[sal21]

I use ado and vb6 classic and access database...

in table have:

Field1 Field2 Field3
AAA BBB -100
AAA CCC 100
AAA BBB 100
AAA BBB 100
.....

based the goup by Field1 and Field2 i need to delete a pair of recorset where the algebric summ of filed3 is =0

in this my case delete this two recordset:
AAA BBB -100
AAA BBB 100

to the and of query i need to have this result:

AAA CCC 100
AAA BBB 100

i hope understand me....

Tks.

[sal21]

I use ado and vb6 classic and access database...

in table have:

Field1 Field2 Field3
AAA BBB -100
AAA CCC 100
AAA BBB 100
AAA BBB 100
.....

based the goup by Field1 and Field2 i need to delete a pair of recorset where the algebric summ of filed3 is =0

in this my case delete this two recordset:
AAA BBB -100
AAA BBB 100

to the and of query i need to have this result:

AAA CCC 100
AAA BBB 100

i hope understand me....

Tks.

sorry for up

[HansV]

Does the table have a primary key, for example an AutoNumber field?

[HansV]

If there is a primary key, I know how to do this in Access itself, using queries, but not using VBA.

[sal21]

Does the table have a primary key, for example an AutoNumber field?

no.

[HansV]

I'm afraid I don't know a solution.