计算机等级考试二级VFP上机试题及解题思路(49)

　　二、简单应用(2小题，每题20分，计40分)

　　在考生文件夹下完成如下简单应用：

　　1. 打开程序文件cylinder.prg，请按要求修改程序并运行程序。

　　2. 以表employee.dbf和orders.dbf中数据为基础，使用SQL命令检索订单数

　　最多的前三名职工的职工号、姓名和订单数，检索结果按订单数降序排序存入表

　　newcoun.dbf，同时将所用SQL命令存入文件new.txt文件。

　　本题的主要考核点：

　　程序的修改与运行、SQL查询语句的使用等。

　　解题思路：

　　1.打开cylinder.prg程序，根据题目要求修改程序中的错误语句：

　　LINE 6改为：carea=cya(r,h)

　　LINE 14改为：RETURN C

　　2.SQL语句的用法：

　　SELECT TOP 3 Employee.职工号, Employee.姓名, COUNT(Employee.职工号) AS 订单数 FROM employee INNER JOIN orders ON Employee.职工号 = Orders.职工号 GROUP BY Employee.职工号 ORDER BY 3 DESC INTO TABLE newcoun.dbf

　　三、综合应用(1小题，计30分)

　　基于数据库pdtmng建立如图所示顶层表单应用，表单文件名为myform.scx，

　　表单控件名为goods，表单标题为"商品"。

　　1. 表单内含一表格控件Grid1(默认控件名)，当表单运行时，该控件将

　　按用户的选择(单击菜单)来显示products.dbf中某一类商品数据，

　　RecordSourceType的属性为4(SQL说明);

　　2. 建立如图所示的菜单(菜单文件名为mymenu.mnx)，其条形菜单的菜单项

　　为"商品分类"和"退出"，"商品分类"的下拉菜单为"小家电"、"饮料"和"酒类";

　　单击下拉菜单中任何一个菜单命令后，表格控件均会显示该类商品(在过程中完

　　成);

　　3. 在表单的Load事件中执行菜单程序mymenu.mpr;

　　4. 菜单项"退出"的功能是关闭表单并返回到系统菜单(在过程中完成)。

　　本题主要考核点：

　　表单控件的属性的修改、SQL语句运用、菜单的建立、顶层表单的设置等知识点。

　　本题解题思路：

　　1.建立表单：

　　可通过“文件”菜单下的“新建”命令或用命令CREATE FORM打开表单设计器。

　　2.修改表单各属性值，NAME=“goods”，CAPTION=“商品”;设置表格控件Grid1的属性，RecordSourceType=4。

　　将表单以myform.scx为文件名保存在考生文件夹下。

　　3.建立菜单：

　　可通过“文件”菜单下的“新建”命令或用命令CREATE MEMU打开菜单设计器。点击“显示”菜单下的“常规选项”命令打开“常规选项”对话框，选中“顶层表单”复选框。在菜单设计器中建立各菜单项，在菜单名称为“商品分类”的菜单项的结果列中选择“子菜单”，并通过“编辑”按钮打开下一级菜单项，在其中建立三个菜单项。在“小家电”菜单项的结果列中选择“过程”，并通过单击“编辑”按钮打开一个窗中来添加“小家电”菜单项要执行的命令“MYFORM.GRID1.RECORDSOURCE="select * from pdtmng!products inner join pdtmng!category on products.分类编码=category.分类编码 where category.分类名称='小家电'"”。

　　用同样的方法建立“饮料”和“酒类”菜单项。

　　再返回上一级菜单设置“退出”菜单项的结果列为“过程”，并通过单击“编辑”按钮打开一个窗中来添加“退出”菜单项要执行的命令myform.release来关闭表单并返回到系统菜单。最后点击“菜单”下的“生成”命令生成.mpr程序。

　　4.将表单myform.scx中的SHOWWINDOWS属性设计为“2-作为顶层表单”，并在表单的LOAD事件中输入“do mymenu.mpr with this,.t.”执行菜单程序。

　　5.保存表单，并运行。