确实是，你的代码简洁高效，我正在学习，对我来说两个难题，
一个是创建统计表结构，你巧妙用于lcstr+scan语句解决让我增长不上，
另一个是统计出相应分数段人数并写入我先搬来用了但是没掌握，请再指教说明下

SELECT czxx, "≥F" + TRANSFORM(fsd.f1) cfsd, COUNT(*) rs FROM zcj, fsd GROUP BY 1, 2 WHERE zf >= fsd.f1 AND zf < fsd.f2 INTO CURSOR cx
SET RELATION TO czxx INTO tjb
SCAN
    REPLACE (cx.cfsd) WITH cx.rs IN tjb
ENDSCAN

TJB(从表)与CX(主表) 两个临时表建立关联,对程序中不明白的命令可以参考VFP帮助文件。

初学要把重点放在弄清楚代码运算时，在多个表间的转换与取数上（不是追求速度，正如娃娃学步，先走后跑），以及逻辑关系与每个时刻点各表的状态。PRG执行时，虽看不见，但你要想像得出来，A表、B表、C表是如何轮流转换到屏幕的前面来的，或者说想像成三表不动，有一个小机械手是怎样到表中去抓数据的，总之是有一个想像，进步会快一点。但用上SQL，速度快了，机制就想不出来了……

高水平。

有道理，学习了。谢谢！