搜索
首页 电脑/网络 程序设计 其他编程语言

delphi动态access求和问题

  procedureTForm1。Button10Click( );vari,s,//begins:=0;i:=3;fori:=3toadoquery1。FieldCount-1dobeginsum:=ADOQuery1。Fields[i]。AsInteger;s:=s+sum;end;label1。
  Caption:=inttostr(s);//label1。Caption:=sum;end;帮帮忙啊!实在想不出了啊!想了很久还是有错误,烦死了。我就是想通过下标把数据累加求和。为什么上述不得呢?但是如果我假设为静态的数据库中存在那些字段那么用下面的方法却能计算总分也就是求和的结果呢,我都弄不懂原因了啊!procedureTForm1。
  Button8Click( );varsx,yy,wl,hx,yw,zf:real;beginsx:=StrToFloat(ADOQuery1。FieldByName('数学')。AsString);yy:=StrToFloat(ADOQuery1。FieldByName('英语')。
  AsString);wl:=StrToFloat(ADOQuery1。FieldByName('物理')。AsString);hx:=StrToFloat(ADOQuery1。FieldByName('化学')。AsString);yw:=StrToFloat(ADOQuery1。
  FieldByName('语文')。AsString);zf:=sx+yy+wl+hx+yw;ADOQuery1。edit;ADOQuery1。FieldByName('总分')。AsString:=FloatToStr(zf);ADOQuery1。post;ADOQuery1。
  Next;end;知道的尽量指点一下哦,我都一直弄不懂这里。

全部回答

2007-04-12

29 0
adoquery1.FieldCount ----> unt ???

类似问题换一批

热点推荐

热度TOP

相关推荐
加载中...

热点搜索 换一换

电脑/网络
其他编程语言
程序设计
电脑装机
操作系统/系统故障
硬件
笔记本电脑
百度
互联网
反病毒
软件
程序设计
其他编程语言
数据库
C/C++
VB
JAVA相关
C#/.NET
VC++
汇编语言
其他编程语言
其他编程语言
举报
举报原因(必选):
取消确定举报