详见附件，谢谢各位。

怎么没有人回复？这个问题很难吗？

我看了看，要是你的kucun*这样的字段数量不确定的话，最好别直接写SQL语句，弄个宏代换就好了。当然若各个字段是固定的，可以直接写SQL语句，也可以生成SQL语句宏替换运行。

select Tb

sel  = 'select '
sel1 = 'kucun'

for i=1 to fcount()-2
    if i!=fcount()-2
       sel = sel + 'sum('+sel1 + allt(str(i))+"),"
    else
       sel = sel + 'sum('+sel1 + allt(str(i))+") from Tb  "
    endif
endfor
&sel.       && 执行查询 ，保证kucun这些字段为数值型

[[it] 本帖最后由 szy345 于 2009-7-19 19:45 编辑 [/it]]

我明天试一下。

我是用VFP数据库，这样编写好像不行。

total

[[it] 本帖最后由 ibmlang_002 于 2009-7-21 11:18 编辑 [/it]]

是啊，用 TOTAL 命令不是更方便呢。
SELE TB
COPY TO LS
SELE 0
USE LS
REPL ALL ,ID WITH ' ',NAME WITH ' '
INDE ON NAME TAG NAME
TOTA ON NAME TO LH
USE
SELE TB
APPE FROM LH
GO GOTT
REPL NAME WITH '合计'

是啊，用 TOTAL 命令不是更方便呢。
SELE TB
COPY TO LS
SELE 0
USE LS
REPL ALL ID WITH ' ',NAME WITH ' '
INDE ON NAME TAG NAME
TOTA ON NAME TO LH
USE
SELE TB
APPE FROM LH
GO GOTT
REPL NAME WITH '合计'