⑥ 选择排序依据为“职工号”,并选中“降序”单选按钮,单击“下一步”按钮。
⑦ 选择报表样式为“简报式”,单击“下一步”按钮。
⑧ 输入报表标题为“职工订单”,单击“完成”按钮,在弹出的“另存为”对话框中将报表保存为empord.frx。
2.简单应用题
在考生文件夹下,完成如下简单应用:
(1)打开程序文件progerr.prg,按文件中给出的功能要求改正其中的错误,以文件名为prognew.prg重新保存该文件并运行程序。
(2)表单文件名为myform.scx,控件名为myform,表单标题为“顶层表单”。
(3)为顶层表单建立菜单mymenu。
单击“退出”菜单时,关闭释放此顶层菜单,并返回到系统菜单(在过程中完成)。
【参考答案】
(1)具体步骤如下:
① 打开progerr.prg文件。
② 将程序修改如下:
OPEN DATABASE ordersmanage
CREATE view viewes AS SELECT职工号,SUM(金额)AS总金额FROM orders;
GROUP BY职工号
SELECT * FROM viewes WHERE总金额>=30000 ORDER BY总金额DESC;
into dbf newtable
③ 执行“文件”菜单中的“另存为”命令,将程序另存为prognew.prg。
(2)具体步骤如下:
① 从“文件”菜单中选择“新建”命令,在弹出的“新建”对话框中选中“菜单”单选按钮,单击“新建文件”按钮。
② 弹出“新建菜单”对话框,单击“菜单”按钮,进入“菜单设计器”窗口。
③ 在“菜单设计器”窗口中输入三个菜单名称“文件”、“编辑”、“退出”,并在“退出”菜单项的“结果”下拉列表中选择“过程”选项,单击“创建”按钮,在弹出的代码窗口中输入如下代码:
myform.release
set sysmenu to default
④ 执行“显示”菜单中的“常规选项”命令,在弹出的“常规选项”对话框中选中“顶层表单”复选框。
⑤ 单击“保存”按钮,将菜单保存为mymenu.mnx。
⑥ 执行“菜单”菜单中的“生成”命令,在弹出的对话框中单击“生成”按钮。
⑦ 关闭“菜单设计器”窗口。
⑧ 从“文件”菜单中选择“新建”命令,在弹出的“新建”对话框选中“表单”单选按钮,单击“新建文件”按钮。
⑨ 在打开的“表单设计器”窗口中更改表单的Caption属性为“顶层表单”。
⑩ 修改表单的ShowWindow属性为“2-作为顶层表单”。
给表单的Init事件添加如下代码:
do mymenu.mpr with this,”mymenu”
将表单保存为myform.scx,并运行表单。
3.综合应用题
在考生文件夹下,完成如下综合应用:
打开表单文件sapp,并完成如下操作(不得有多余操作):
(1)将“课程”表添加到表单的数据环境中;
(2)使列表框List1中的数据项为“课程”表中的课程名称(课程.课程名);
(3)单击列表框中的数据项时,统计选修了所选课程的学生人数(从“考试成绩”表),并将结果存储在以课程名命名的表中,表中只有一个字段“人数”;
(4)添加一个命令按钮Command1,单击该按钮时关闭表单。
【参考答案】
① 打开表单文件sapp,单击鼠标右键,在弹出的快捷菜单中选择“数据环境”命令。
② 在打开的“数据环境设计器”窗口中单击鼠标右键,在弹出的快捷菜单中选择“添加”命令。
③ 系统弹出“打开”对话框,选择“课程”表,单击“确定”按钮。
④ 选择列表框List1,在“属性”窗口中设置RowSourceType属性为“6-字段”,设置RowSource属性为“课程.课程名”。
⑤ 为列表框List1的Click事件添加如下代码:
filename=this.value
select count(考试成绩.学号)as 人数 from 课程inner join考试成绩;
on 课程.课程编号=考试成绩.课程编号;