问答题 利用表设计器在考生文件夹下建立表table3,表结构如下: 学号 字符型(10) 姓名 字符型(6) 课程名 字符型(8) 分数 数值型(5,1) 然后编写程序prog1.prg,在xuesheng表和chengji表中查询所有成绩不及格(分数小于60)的学生信息(学号、姓名、课程名和分数),并把这些数据保存到表table3中(若一个学生有多门课程不及格,在表table3中就会有多条记录)。要求查询结果按分数升序排列,分数相同则按学号降序排列。 要求:在程序中用SET RELATION命令建立chengji表和xuesheng表之间的关联(同时用INDEX命令建立相关的索引),并通过DO WHILE循环语句实现规定的功能。最后运行程序。
【正确答案】[操作步骤] 步骤1:通过前面所学的知识,按照题目的要求新建一张表table3。 步骤2:新建程序prog1.prg,输入下列命令语句,并运行该程序。 * * * * * * * *prog1.prg中的代码* * * * * * * * && 关闭程序运算的显示过程 SET TALK OFF && 打开数据库 OPEN DATABASE cj m && 选择查询字段,制定字段来源,设置查询条件,将查询结果存储到表temp中 SELEC * FROM table3 WHERE .F. INTO TABLE temp SELECT 1 && 打开xuesheng表 USE xuesheng && 建立索引 INDEX ON学号TAG学号 SELECT 2 && 打开chengji表 USE chengji && 建立索引 INDEX ON学号TAG学号 SET RELATION TO学号INTO xuesheng GO TOP && 循环直至遍历所有记录 DO WHILE.NOT.EOF() && 先进行判断,满足条件就向temp表中插入数据 IF chengji.数学<60 INSERT TNTO temp Values (xuesheng.学号,xuesheng.姓名,‘数学’,chengji.数学) ENDIF && 先进行判断,满足条件就向temp表中插入数据 IF chengji.英语<60 ZNSERT INTO temp Values (xuesheng.学号,xuesheng.姓名.‘英语’,chengji.英语) (ENDIF && 先进行判断,满足条件就向temp表中插入数据 (IF chengji.信息技术<60 INSERT INTO temp Values(xuesheng.学号,xuesheng.姓名,‘信息技术’,chengji.信息技术) (ENDDO && 选择查询字段,指定字段来源,查询结果按分数升序排列,分数相同按学号升序排列,将查询结果存储到ARRAY arr中 SELECT * FRON temp ORDER BY分数,学号DESC INTO ARRAY arr && 将ARRAY arr中数据插入table3中 TNSERT INTO table3 FROM ARRAY arr && 关闭数据库 CLOSE DATABASE 关闭表 CLOSE TABLES ALL 删除temp DROP TABLE temp && 关闭程序运算的显示过程 SET TALK ON && 返回 RETURN * * * * * * * * * * * * * * * * * * * * * * * * * [考点] 本大题主要考查的知识点是:新建自由表,创建程序文件,SQL语句中的ORDER BY、GROUP BY、INTO TABLE短语的使用,循环、选择语句的使用,利用命令建立索引,删除表以及SQL的插入语句。 利用建立索引的命令来新建索引,通过循环语句的使用来判断满足条件的数据,再使用IF语句进行分段节选,将符合要求的信息进行保存,最后再将查询出的结果进行排序和保存,删除中间表。
【答案解析】