如何求总分;
现有一数据库如下:
学号 姓名 语文 数学 英语 ... 总分 名次
001 kk 70 80 68 ...
002 ll 80 90 70 ...
003 oo 90 98 80 ...
.......
课程、人数不定
求每位学生的总分???现有部分代码如下;(只能求当前记录的总分,加循环不行。特向高人求救,在线等) ''计算有几个字段
for Each fd In Data1.Database.Tabledefs.(tableindex).Fieds
fieldcount=fieldcount + 1
next ''从第三个字段开始加到倒数第三个结束
for i=2 to fieldcount-3
sun=data1.recordset.fields(i)+sun
next i
''更新数据
data1.recordset.edit
data1.recordset.fields(fieldcount-2).value=sun
data1.recordset.update
现有一数据库如下:
学号 姓名 语文 数学 英语 ... 总分 名次
001 kk 70 80 68 ...
002 ll 80 90 70 ...
003 oo 90 98 80 ...
.......
课程、人数不定
求每位学生的总分???现有部分代码如下;(只能求当前记录的总分,加循环不行。特向高人求救,在线等) ''计算有几个字段
for Each fd In Data1.Database.Tabledefs.(tableindex).Fieds
fieldcount=fieldcount + 1
next ''从第三个字段开始加到倒数第三个结束
for i=2 to fieldcount-3
sun=data1.recordset.fields(i)+sun
next i
''更新数据
data1.recordset.edit
data1.recordset.fields(fieldcount-2).value=sun
data1.recordset.update
不懂啊.
如果用ret as adodb.recordset
select * from biao
if not ret.eof then
ret.movefirst
do while not ret.eof
ret.fields(总分)=ret.fields(语文)+ret.fields(数学)+ret.fields(英文)...
ret.movenext
loop
end if