求vfp等距抽样的小程序
按学生成绩排序,每隔5个学生抽一个。
回复 楼主 zsh9898
程序代码:
CREATE CURSOR TABNAME (JLH N(2),XM C(1),CJ N(3)) FOR I=1 TO 20 INSERT INTO TABNAME VALUES (I,CHR(64+I),110+I) ENDFOR BROWSE FOR MOD(RECNO(),6)=0 *或者 SELECT * FROM TABNAME WHERE MOD(RECNO(),6)=0 INTO CURSOR TEMP BROWS
[ 本帖最后由 sdta 于 2012-5-15 11:59 编辑 ]