VFP与表操作关程序设计.doc

*------------------------------------------------------- *【程序设计】 *------------------------------------------------------- *题目：计算机等级考试数据表为STUDENT.DBF,凡笔试和上机成绩 * 均达到80分以上者,应在等级字段中填入优秀字样。 * 请用DO WHILE ...ENDDO语句编写。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- SET TALK ON SET LOGERRORS ON CLEAR **********Program********** ********** End ********** CLOSE DATA SET LOGERRORS OFF SET TALK OFF 答案：---------------------- USE STUDENT DO WHILE .NOT. EOF() IF 笔试=80 .AND. 上机=80 REPL 等级 WITH 优秀 ENDIF SKIP ENDD LIST *------------------------------------------------------- *【程序设计】 *------------------------------------------------------- *------------------------------------------------------- *【程序改错】 *------------------------------------------------------- *题目:已有数据库djks.dbf。请编写程序modi1.PRG，在程序中首 * 先通过复制djks.dbf生成一个具有考号、 姓名、笔试及上 * 机四个字段的数据库文件aaa.dbf(只有结构)，然后再修改 * 其结构，把考号字段改为数值型8个字符宽、姓名字段改为 * 8个字符宽。要求必须使用： copy to 结构文件名 * structure extended 和 create 生成库文件名 from 结* 构文件名命令实现，使用其它方法不得分。 *------------------------------------------------------- *注意：不可以增加或删除程序行，也不可以更改程序的结构。 *------------------------------------------------------- set talk off clear clos data use djks copy stru to aaa fiel 考号,姓名,笔试,上机 USE AAA ***********FOUND********** COPY STRU TO BBB USE BBB LOCA FOR FIELD_NAME=考号 ***********FOUND********** REPL TYPE WITH N,FIELD_LEN WITH 8 LOCA FOR FIELD_NAME=姓名 REPL FIELD_LEN WITH 8 ***********FOUND********** CREATE AAA to BBB use aaa list stru clos data set talk on 答案： 1). COPY★STRU★TO★BBB★EXTENDED 2). R★EPLF★IELD_TYPE★WITH★N,FIELD_LEN★WITH★8 3). CREATE★AAA★FROM★BBB *------------------------------------------------------- *【程序改错】 *------------------------------------------------------- *题目：显示XSDB.DBF中每个学生的姓名、计算机成绩和等级；等 * 级划分如下：计算机成绩大于等于90显示优秀；60到89 * （包括 60和89）之间显示及格；60分以下显示补考。 * 如显示：张丽娜 90 优秀 。 *-----------------------------------------