Visual Basic - Muestra de datos erroneos en FlexGrid

Hola a todos, mi problema es el sgte:
Tengo un programa que hace unas consultas a bases de datos y las muestra x un msflexgrid, los datos que muestro son valores acumulados de exportaciones de empresas a diferentes paises,
el problema es el sgte y lo voy a describir con un ejemplo :
si consulto x una empresa que tiene un RUT 11.222.333-4 por ej, y el resultado a mostrar es :
brasil = 8
peru = 2
argentina = 5,
me muestra resultado correctamente pero hago la misma consulta despues y el resultado cambia:
brasil = 8
peru = 2
argentina = 5
brasil = 8,
como pueden ver el programa a veces repite resultados (rara vez lo hace) y estos resultados los debo sumar y esa suma obviamente no siempre es correcta.

Gracias x su ayuda

nota: los valores los muestro de la sgte forma :

codigopais=recodset!codigo
form1.grid.TextMatrix(fil, 3) = codigopais

hazlo así
dim cadenaSQL as string

CadenaSql= " Transform Sum(pais) as Sumapais Select Rut from Ventas where RUT = " & cadenarut & " Pivot pais"

Set tabla=mibase.openrecordset(cadenaSql,dbopendynaset)

set data1.recordset=tabla
(Debes enlazar la grid con la data1 en el datasource)