下面是VFP编写一个按成绩截取一定人数的程序代码：

• 使用CURSOR SELECT语句打开表格并将数据排序。
  SELECT * FROM 表格名 ORDER BY 成绩 DESCENDING
• 创建一个循环，以跟踪已选中的人数。
  nCount = 0
  DO WHILE nCount < 指定人数 && !EOF()
• 如果条件满足，则将当前记录加入列表中。
  INSERT INTO 列表名 VALUES (m.学生ID, m.学生姓名, m.成绩)
  nCount = nCount + 1 * 移动到下一条记录。 SKIP ENDDO