suma de colmunas en datagrid (vb6)

[pedrokristian]

hola gente tengo este problema yo he declarado en mi form asi

sub Suma ( )
dim sql as string

sql = "SELECT sum(PRECIO) as TOTAL from PRODUCTOS"
resultado= rs!PRECIO
text1.text = resultado

end sub
y en el text1 he declarado asi

private sub text1_change()
Suma
end sub


y saben que es lo que pasa que al sumar se supone que debe aparecer el total de mi columna precio pero me aparece el total del primer registro. si me pueden ayudar les agradeceria mucho gracias necesito que me ayuden gracias.