VFP程序设计填空改错试题和答案.docx

题2 单表程序设计1 02题2 单表程序设计 *------------------------------------------------------*【程序设计】 *------------------------------------------------------*题目：设表 RSDA.DBF 结构为：学号（C，5） ，姓名（C，6） ， * 职称（C，6）统计出 RSDA.DBF 表中职称为工程师的 * 人数。 （利用 DO WHILE……ENDDO 循环语句实现） 。 * 将人数存入变量 Y 中 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------SET TALK OFFSET LOGERRORS ON Y=-1**********Program**********use rsda store 0 to slocate for 职称=工程师do while not eof() s=s+1 continueenddo?共有工程师+str(s,3)+名use Y=S********** End **********DO YZJ9 WITH Y SET TALK OFF RETURN *------------------------------------------------------*【程序设计】 *------------------------------------------------------*题目：有学生数据表 student.dbf，其中编号字段的值从 1 开始 * 连续排列。欲按编号的 1，4，7，10，...规律抽取学生 * 参加比赛，并将满足条件的记录保存到 st1.dbf 中，请编 * 程完成。 * （用 do while ..endd 和 scatter、gather 语句完成） * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------SET TALK ONSET LOGERRORS ONclearsele 1use studentsele 2use st1 zap**********Program**********sele 1do while .not. eof()if mod(编号,3)=1scatter to arrysele 2appe blan gather from arryEndifsele 1skipendd********** End **********sele 2list close dataSET LOGERRORS OFFSET TALK OFF *------------------------------------------------------*【程序设计】 *------------------------------------------------------*题目：编程以物理连接方法求学生刘一各门功课的考试成绩， * 已知数据表 STUDENT.DBF 和 STUDY.DBF。新生成的数据 * 表名为 SG.DBF。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------SET TALK ONSET LOGERRORS ON**********Program**********SELE 1USE STUDENTSELE 2USE STUDYSELE 1JOIN WITH STUDY TO SGFOR 学号=STUDY.学号 .AND. 姓名=刘一 FIELDS 学号,姓 名,STUDY.课程号,STUDY.成绩 SELE 3 USE SG LIST********** End **********CLOSE DATASET LOGERRORS OFFSET TALK OFF*------------------------------------------------------*【程序设计】 *------------------------------------------------------*题目：计算机等级考试数据表为 STUDENT.DBF,凡笔试和上机成绩 * 均达到 80 分以上者,应在等级字段中填入优秀字样。 * 请用 DO WHILE ...ENDDO 语句编写。 * 请按照题目要求，在下面编写程序代码。 *----------------------------------------------------