其实用repl 总分 with 语文 + 数学 + 英语 + ……,是最简单明了的。
你的意思是否是写一个比较通用一点的计算总分的形式?就是不要写定那些学科?若是这样的话,请你自己在电脑上测试一下(没有测试):
close all
use成绩 alias cj in 0
select cj
blank fields 总分 all
go top
nzd = fcount()
scan nzf = 0 for i = 1 to nzd cxk = field(i) nzf = nzf + evaluate(cxk) endfor replace 总分 WITH nzf
endscan
select cj
browse
*|* 这样的话,可能会慢一些哈。
*|* 是你希望的吗?