现有表文件gem xx.dbf,如何从“购物清单”字段中统计每天购物共用了多少元，并写入统计字段中。请高手赐教，万分感谢！！！

更正：从“购物明细”字段中统计每天购物用了多少元，并写入“合计”字段中

谢谢！

@吹水佬 谢谢！如何将gwmxz.dbf中“购物明细”统计结果写入“合计”字段中，还请加以指导！谢谢！

[此贴子已经被作者于2025-10-16 00:58编辑过]

各位高手，请分享一下具体代码！谢谢！

@吹水佬 用上我提供的表文件gwmxz.dbf,上述代码如何修改？请指点！
另上述代码运行后显示结果为0，不知为何？

@吹水佬 刚才运行一下代码，不知为何“合计”中都显示“0.00”

@吹水佬 谢谢您的热心指点！不知为何我在vfp9.0上运行程序，“合计”字段下均显示为0.00[合计 N(7,2)],未达到统计的效果。

就是没有实现统计汇总功能

运行的程序为下列代码：
DECLARE long sscanf IN msvcr71 long, string, single@, long@
DECLARE long strcpy IN msvcr71 string@, string
USE C:\_temp\gwmxz.dbf ALIAS td
buffer = REPLICATE(0h00,256)
REPLACE ALL 合计 WITH f_合计(购物明细) IN "td"
SELECT * FROM td

FUNCTION f_合计(c购物明细)
    p = strcpy(@buffer, 购物明细)
    a = 0.00
    n = 0
    t = 0
    DO WHILE SYS(2600,p,1) != 0h00
        IF sscanf(p,"%f%n",@a,@n) == 1
            p = p+n
            IF SYS(2600,p,2)=="元"
                t = t+a
                p = p+2
            ENDIF
        ELSE
            p = p+1
        ENDIF
    ENDDO
    RETURN t
ENDFUNC