程序代码:* 统计表 中除 [color=#808080]<科目>字段的数据类型不动外,其余字段的数据类型全部改为数值型[/color]
CLOSE DATABASES ALL
USE 统计表 IN 0 ALIAS tj
BLANK ALL FIELDS 总和,平均分,最高分,最低分
USE 成绩库 IN 0 ALIAS cj
SELECT cj
FOR i=1 TO FCOUNT("cj")
CALCULATE SUM(EVALUATE(FIELD(i))),AVG(EVALUATE(FIELD(i))),MAX(EVALUATE(FIELD(i))),MIN(EVALUATE(FIELD(i))) TO ARRAY atj
REPLACE FROM ARRAY atj RECORD i FIELDS 总和,平均分,最高分,最低分 IN tj
ENDFOR
SELECT tj
BROWSE









