关于数据库中对某列求和的问题！谢谢！
现有数据库ADOquery1：
i s
0 2
1 5.5
2 8
3 9.5
请问想对s这一列进行求和，该怎样实现呢？谢谢！我的代码是这样写的：
var
i:integer;
s:double;
begin
s := 0;
for i := 0 to ADOQuery1.RecordCount do
begin
s := s + ADOQuery1.FieldValues[ 's '];
end;
i := i+1;
edit1.Text := floattostr(s);
end;
运行没错误，可是结果不对，结果为10，实际结果应该是25啊，请问大家我哪里错了？帮忙改一下！谢了!
[解决办法]
var
s:double;
begin
s := 0;
adoquery1.First;
with not adoquery1.Eof do
s := s + ADOQuery1.FieldValues[ 's '];
edit1.Text := floattostr(s);
[解决办法]
var
s:double;
begin
s := 0;
with adoquery1 do
begin
First;
while not EOF do
begin
s := s + FieldValues[ 's '].AsFloat;
Next;
end;
end;
edit1.Text := floattostr(s);
end;
