FOR I=1 TO RN2
    SELECT TMP_CASH2
    GO I
    RQ=""
    BH=编号
    FOR J=1 TO RN
       SELECT TMP_CASH
        GO J
        IF 编号=BH AND 操作=1
           RQ=RQ+STR(YEAR(费用期间),4)+[/]+PADL(MONTH(费用期间),2,[0])++[ ;]
        ENDIF
    ENDFOR
    UPDATE TMP_CASH2 SET 交费备注=RQ WHERE 编号=BH
    RQ=""
ENDFOR   
是不是GO J不要的？
GO I 肯定是要的，

用的是老掉牙的VFP6.0

哈哈，SQL命令最后看走眼了，后面是INTO TABLE

思路第一步，还有一种方法，就是创建一个表，根据 编号 字段建立索引
汇总数据及日期合并放在一起处理

GO J 也要，否则记录指针如何移动

通过这个表的数据处理示例，可以把数据表中的命令函数学个70%左右。处理的方法是多样的。就看楼主是否是有心人。

*clear all
*Set Collate To "MACHINE"
SELECT 编号,MAX(费用期间) 费用期间,SUM(费用合计) 合计,SUM(电费合计) 电费,SUM(水费合计) 水费,SUM(管理费) 管理费,SUM(滞纳金) 滞纳金,SUM(垃圾费) 垃圾费,1 AS 公用电费,交费,备注,""+SPACE(120) 交费备注,ID16 ;
       FROM TMP_CASH WHERE 操作=1 GROUP BY 编号 INTO TABLE DATA\TMP_CASH2
      
select TMP_CASH2
index on 编号 to bh

select TMP_CASH
set relation to 编号 into TMP_CASH2
scan
if tmp_cash.编号=TMP_CASH2.编号 AND 操作=1
    replace TMP_CASH2.交费备注 with TMP_CASH2.交费备注-","-dtoc(tmp_cash.费用期间)
ENDIF   
endscan
set relation to
select tmp_cash2
set index to
*replace all 内容 with substr(内容,2)
* 显示结果
browse

改改后，出来了，
SCAN 才几行，怎么FOR 要这么多，效果1样啊

关键之处在于两表建立了临时关系，也就是通过关键字段的连接。
如果数据量大的话，我的代码运行速度绝对比你的代码运行速度快。