那个程序改成了这样的，能执行，但是汇总的表中的数据汇总后没有变化，请不吝再指点指点，谢谢。
cc=MESSAGEbox("是否将本周加入汇总",36,"提示")
IF cc=6
        DO while not EOF()
           SELECT 1
           USE &week
           SCATTER fields a课时,b课时,早自习,午自习,晚自习1,晚自习2,晚自习3,病假,私假,旷工 to kq(10)
           SKIP
           SELECT 2
           USE kqhz
           SCATTER fields a课时,b课时,早自习,午自习,晚自习1,晚自习2,晚自习3,病假,私假,旷工 to hz(10)
             FOR i=1 to 10
             hz(i)=hz(i)+kq(i)
             endfor
           GATHER from hz fields a课时,b课时,早自习,午自习,晚自习1,晚自习2,晚自习3,病假,私假,旷工
             SKIP
          ENDDO
ENDIF

把USE &week和USE kqhz放到循环体外，否则总是对表的第一条记录进行操作，自然得不到想要的结果。