还是以上问题，如果一张表中按班级不同有不同的抽样间隔，能实现吗，谢谢！！！！

CREATE CURSOR TABNAME1 (序号 N(2),姓名 C(1),班级 C(20),成绩 N(3))
CREATE CURSOR TABNAME (序号 N(2),姓名 C(1),班级 C(20),成绩 N(3))
FOR I=1 TO 26
    INSERT INTO TABNAME VALUES (I,CHR(64+I),"初一("+TRANSFORM(IIF(MOD(I,3)=1,1,IIF(MOD(I,3)=2,2,3)))+")班",110+I)
ENDFOR
SELECT DISTINCT 班级 FROM TABNAME INTO ARRAY BJ &&查询共有几个班级
CSTR="683" &&用于查询不同班级(分别为1、2、3)学生的间隔
FOR I=1 TO ALEN(BJ)
    SELECT * FROM TABNAME WHERE AT(TRANSFORM(I),班级)>0 INTO CURSOR TABNAME2 &&从班级(1)开始查询
    BROWSE TITLE "初一("+TRANSFORM(IIF(MOD(I,3)=1,1,IIF(MOD(I,3)=2,2,3)))+")班学生情况查询表"
    IF VAL(SUBSTR(CSTR,I,1))<RECCOUNT("TABNAME2") && 判断间隔学生数是否小于TABNAME2表中的记录数
       SELECT * FROM TABNAME2 WHERE MOD(RECNO(),VAL(SUBSTR(CSTR,I,1))+1)=0 INTO ARRAY TEMP
       SELECT TABNAME1
       APPEND FROM ARRAY TEMP
    ENDIF
ENDFOR
BROWSE

太好了，我试试啊

“CSTR="683" &&用于查询不同班级(分别为1、2、3)学生的间隔”，如果间隔为12、15等两位数，如何处理呢？

12、15是那个班的
你用的
VFP6?
VFP9?
如果是VFP9简单，VFP6复杂些。
多看看VFP帮助中的字符型函数用法。

[ 本帖最后由 sdta 于 2012-5-16 19:54 编辑 ]

一共有176个班呢，每个班抽样间隔都不一样，都在两位数以上

专门建个表，保存这些间隔
表结构：班级 C(20),间隔 C (2)
班级前后顺序不能乱
然后用下列代码将间隔保存为字符串
USE 间隔
LOCAL CJG
CSTR=""
SCAN
    CSTR=CSTR+间隔 &&生成间隔字符串
ENDSCAN
? CJG

*---------------------------------------------
前面的代码：SUBSTR(CSTR,I,1)
改为
SUBSTR(CSTR,I,2)

----------------------------------------------
具体情况还要具体处理

[ 本帖最后由 sdta 于 2012-5-17 10:54 编辑 ]

很好，谢谢啦