在考生文件夹下有学生成绩数据库“chengji”,包括如下所示两个表文件及相关的索引文件: student2.dbf(学生文件:学号C(8),姓名C(8),性别C(2),班级C(5);主索引键:学号) chengji2.dbf(成绩文件:学

admin2010-08-26  25

问题 在考生文件夹下有学生成绩数据库“chengji”,包括如下所示两个表文件及相关的索引文件:
    student2.dbf(学生文件:学号C(8),姓名C(8),性别C(2),班级C(5);主索引键:学号)
    chengji2.dbf(成绩文件:学号C(8),课程名C(20),成绩N(3);索引键:学号)
    cjb.dbf(成绩表文件:学号C(8),姓名C(8),班级C(5),课程名C(20),成绩N(3)
    设计一个名为“cjjs”的菜单,菜单中有两个菜单项“计算”和“退出”。
    程序运行时,单击“计算”菜单项应完成下列操作:
    将所有选修了“计算机基础”的学生的“计算机基础”成绩,按“成绩”由高到低的顺序填到成绩表文件“cjb.dbf”中。(先清空表“cjb”)
    单击“退出”菜单项,程序终止运行。(注:相关数据表文件存在于考生文件夹下)

选项

答案①选择【文件】→【新建】命令,选择“菜单”,单击“新建文件”按钮,再单击“菜单”按钮,打开菜单设计器。在“菜单名称”中输入“计算”,在“结果”下拉列表框中选择“过程”,单击“创建”按钮创建“计算”过程,在菜单过程代码编辑窗口中输入以下代码: SET TALK OFF OPEN DATABASE chengji SELECT student2.学号,姓名,班级,课程名,成绩FROM chengji2,student2 WHERE chengji2.学号=student2.学号and课程名="计算机基础"ORDER BY成绩DESC INTO ARRAY aResult DELETE FROM cjb INSERT INTO cjb FROM ARRAY aResult CLOSE ALL USE cjb PACK USE SET TALKON 关闭菜单过程代码编辑窗口回到菜单设计器。 ②单击下一行,输入菜单名称“退出”,在“结果”下拉列表框中选择“命令”,在右边的“命令”文本框中编写程序代码: SET SYSMENU TO DEFAULT ③选择【菜单】→【生成】命令,将菜单保存为“cjjs”,生成一个菜单文件“cjjs.mpr”。关闭菜单设计窗口,在命令窗口输入命令:DO cjjs.mpr,看到Visual FoxPro的菜单栏被新建的菜单所代替,单击“退出”菜单命令将恢复系统菜单。

解析
转载请注明原文地址:https://kaotiyun.com/show/H8zp777K
0

最新回复(0)