图48-1
分别单击前两个菜单命令行中的\创建\按钮，进入程序设计的编辑窗口，在命令窗口中输入如下程序段： ******\按出版单位\菜单命令的程序段***** SELECT * FROM 图书 ORDER BY 出版单位
***************************************** ******\按作者编号\菜单命令的程序段***** SELECT * FROM 图书 ORDER BY 作者编号
******************************************
在\关闭\菜单项的命令文本框中编写程序代码：SET SYSMENU TO DEFAULT。选择菜单命令\菜单\生成\，生成一个菜单文件mymenu.mpr。
（2）在\工具\菜单选择\向导\子菜单，单击\报表\选项，出现\向导选取\对话框，依据题意数据源是多个表，因此选定\一对多报表向导\。点击\确定\。
步骤一：在弹出的对话框中\数据库和表\选项选择父表\作者\，并把\可用字段\的\作者编号\、\作者姓名\和\所在城市\选为\选定字段\。
步骤二：选择子表\图书\，并把全部\可用字段\选为\选定字段\。 步骤三：系统自动以\作者编号\建立两表之间的关系。
步骤四：在\排序记录\中选择\作者姓名\，并选择\升序\排序。 步骤五：报表样式选择为\帐务式\，方向为\纵向\。
步骤六：把表单标题改为\书籍信息\，可以在点击\完成\之前点击\预览\按钮来预览生成的报表，最后点击\完成\按钮。
将报表以文件名为rep保存在考生的文件夹里。
三、综合应用题（1小题，计30分）
设计一个文件名和表单名均为myaccount的表单。表单的标题为\外汇持有情况\。
表单中有一个选项按钮组控件(myOption)、一个表格控件(Gridl)以及两个命令按钮\查询\和\退出\。其中，选项按钮组控件有两个按钮\现汇\、\现钞\。运行表单时，在选项组控件中选择\现钞\或\现汇\，单击\查询\命令按钮后，根据选项组控件的选择将\外汇账户\表的\现钞\或\现汇\根据钞汇标志字段确定)的情况显示在表格控件中。
单击\退出\按钮，关闭并释放表单。
注：在表单设计器中将表格控件Grid1的数据源类型设置为\说明\。 【答案】
在命令窗口中输入命令：CREATE FORM account，打开表单设计器，通过\表单控件\工具栏向表单添加1个表格、1个选项按钮组和2个命令按钮。
选中表单，在属性面板中修改将Caption的属性值改为\外汇持有情况\，然后在属性面板顶端的下拉框中选择Command1，修改该命令按钮控件的Caption属性值为\查询\，以同样的方法将第二个命令按钮设置Caption属性值改为\关闭\，右击选项按钮组（Optiongroup1），选择\编辑\快捷菜单命令，在此状态下（编辑状态下，控件四周出现蓝色框线），分别修改两个单选项的Caption属性值为\现汇\和\现钞\。最后，在属性面板中，将表格（Grid1）的RecordSourceType设置为\说明\。
双击命令按钮\查询\，编写该控件的Click事件，程序代码如下： *****命令按钮Command1（查询）的Click事件代码***** DO CASE
CASE Thisform.myOption.option1.value=1
Thisform.Grid1.RecordSource=\外币代码,金额 FROM 外汇账户 WHERE 钞汇标志='现汇'; INTO CURSOR temp\
CASE Thisform.myOption.option2.value=1
Thisform.Grid1.RecordSource=\外币代码,金额 FROM 外汇账户 WHERE 钞汇标志='现钞'; INTO CURSOR temp\ENDCASE
*****************************************************
以同样的方法为\关闭\命令按钮编写Click事件代码：Thisform.Release。 保存表单完成设计。运行结果如图48-2所示。
图48-2
49
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
(1)建立项目\城乡超市\；并把\货物管理\数据库加入到该项目中。
(2)为\货物表\增加字段：价格N(6，2)，该字段允许出现\空\值，默认值为.NULL.。 (3)为\价格\字段设置有效性规则：\价格>0\；出错提示信息是：\价格必须大于0\。
(4)使用报表向导为货物表创建报表：报表中包括\货物表\中全部字段，报表样式用\经营式\，报表中数据按\货物编号\升序排列，报表文件名rep.frx。其余按缺省设置。
【答案】
（1）启动Visual FoxPro后，在命令窗口输入命令：\城乡超市\，新建一个项目管理器。在项目管理器\城乡超市\中，首先在\数据\选项卡中选择\数据库\，然后单击选项卡右边的\添加\命令按钮，在系统弹出的\打开\对话框中，将考生文件夹中的数据库\货物管理\添加到项目管理器中，单击\确定\按钮。
（2）单击\数据库\前面的\号，依次展开至\货物表\，然后单击选项卡中的\修改\命令按钮，打开表设计器。在\字段\选项卡的最后一个空字段名中，输入新的字段名\价格\，根据题意，依次输入类型、宽度和小数位数，并将\选上，允许空值，在\字段有效性\默认值文本框中输入\为该字段设置默认值。
（3）选中\价格\字段，在规则文本框中输入\价格>0\，在信息文本框中输入\价格必须大于0\，设置字段的有效性规则。
（4）在\工具\菜单中选择 \向导\→\报表\菜单命令，出现\向导选取\对话框。依据题意，数据源是一个表，因此选定\报表向导\，点击\确定\。
步骤一：在弹出的对话框中\数据库和表\选项选择\货物管理\数据库中的\货物表\，并把全部的\可用字段\选为\选定字段\。
步骤二选取默认值。
步骤三：选择\经营式\样式。 步骤四选取默认值。
步骤五：在\排序记录\中选择\货物编号\升序排序。
步骤六：可以在点击\完成\之前点击\预览\按钮来预览生成的报表，最后点击\完成\按钮。 并以文件名为\保存在考生的文件夹里。
二、简单应用题（共2小题，每题20分，计40分）
(1)建立视图my，并将定义视图的代码放到mycha.txt中。具体要求是：视图中的数据取自表\宿舍信息\的全部字段和新字段\楼层\。按\楼层\排序(升序)。其中\楼层\是\宿舍\字段的第一位代码。
(2)根据表\宿舍信息\和表\学生信息\建立一个查询，该查询包含住在2楼的所有学生的全部信息和宿舍信息。
要求按学号排序，并将查询保存为chaxun。
【答案】
（1）在命令窗口输入命令：MODIFY FILE mycha，打开文本编辑器，在编辑器窗口中输入如下程序段。 ******文件mycha.txt中的程序段***** OPEN DATABASE student
CREATE VIEW my AS SELECT *, left(宿舍信息.宿舍,1) as 层数 FROM 宿舍信息 ORDER BY 3 ************************************
保存文件，在命令窗口输入命令：DO mycha.txt，运行程序。
（2）在命令窗口输入：CREATE QUERY chaxun，打开查询设计器，新建一个查询。在查询设计器中，分别将\宿舍情况\和\学生信息\两个数据表文件添加到查询设计器中，系统自动查找两个数据表中匹配的字段进行内部联接，单击\确定\按钮。
在查询设计器的\字段\选项卡中，将\可用字段\列表框中的全部字段添加到右边的\选定字段\列表框中，在\筛选\选项卡中，在\字段名\下选择\表达式\，在弹出的\表达式生成器\的表达式中输入\宿舍信息.宿舍,1)\，如图49-1所示。
图49-1
单击右边的\确定\按钮，回到\筛选\选项卡，\条件\选择\，在实例文本框中输入2，在\排序依据\选项卡中，选择\学生信息.学号\升序排序。
保存查询设计，执行菜单命令\查询\运行查询\，查看结果。
三、综合应用题（1小题，计30分）
在考生文件夹下完成如下综合应用：
设计一个表单名为Form_one、表单文件名为YEAR_SELECT、表单标题名为\部门年度数据查询\的表单，其表单界面如下图所示。其他要求如下：
(1)为表单建立数据环境，向数据环境添加S_T表(Cursorl)。
(2)当在\年度\标签微调控件(Spimlerl)中选择年度并单击\查询\按钮(Commandl)时，则会在下边的表格(Gridl)控件内显示该年度各部门的四个季度的\销售额\和\利润\。指定微调控件上箭头按钮(SpinnerHighValue属性)与下箭头按钮(spinnerLowvalue属性)值范围为2010-1999，缺省值(Value属性)为2003，增量(Imcrement属性)为l。
(3)单击\退出\按钮(Command2)时，关闭表单。
要求：表格控件的RecordSourceType属性设置为\说明\。 【答案】
单击\文件\菜单中的\新建\，在类型选择框中选择\表单\，单击\新建文件\按钮，打开表单设计器。
在属性窗口中设置表单的Caption属性为\部门年度数据查询\，Name属性值改为myf，从\表单控件\工具栏中选择1个标签控件，1个微调控件，1个表格控件和2个命令按钮放置在表单上。在属性面板中分别设置两个命令按钮的Caption属性分别为\查询\和\关闭\，标签控件的Caption属性值设置为\年度\，表格的RecordSourceType属性值设置为\说明\
在属性面板中将微调控件的Value属性值设置为\，Increment属性值为\，SpinnerLowValue属性值为\，SpinnerHighValue属性值为\。结果如图49-2所示。
图49-2
双击命令按钮\查询\，编写该控件的Click事件，程序代码如下： *****命令按钮Command1（查询）的Click事件代码*****
Thisform.Grid1.RecordSource=\* FROM PT WHERE 年度=ALLTRIM(STR(Thisform.Spinner1.Value)); INTO CURSOR temp\
********************************************
以同样的方法为\关闭\命令按钮编写Click事件代码：Thisform.Release。 保存表单文件为year.scx到考生文件夹下。运行表单，查看结果。
50
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
(1)新建一个名为\中国外汇\的数据库。
(2)将自由表\汇率\、\账户\、\代码\加入到新建的\外汇\数据库中。
(3)用SQL语句新建一个表\，其中包含4个字段\币种1代码\、\币种2代码\、\买入价\，\卖出价\，请将SQL语句存储于hl.txt中。
(4)表单文件test中有一个名为forml的表单，请将文本框控件Text1设置为只读。 【答案】
（1）在命令窗口中输入命令：\中国外汇\，新建一个数据库。
（2）在命令窗口中输入命令：\DATABASE 中国外汇\，打开数据库设计器。右键单击数据库设计器，选择\添加表\快捷菜单命令，系统弹出\打开\对话框，将考生文件夹下的\汇率\、\帐户\和\代码\三个自由表分别添加到数据库\中国外汇\中。
（3）在命令窗口中输入：MODIFY FILE hl，打开文本编辑器，在编辑器中输入程序语句： CREATE TABLE HL(币种1代码 C(2), 币种2代码 C(2),买入价 N(8,4),卖出价 N(8,4)) 保存文件，在命令窗口输入命令：DO hl.txt执行文件。
（4）从菜单栏里点击\文件\并选择\打开\，或直接单击工具栏上的\打开\图标，在弹出的对话框中选择要打开的表单文件\。单击表单上Text1控件，在其属性窗口中把\的属性值改为\真\。
二、简单应用题（共2小题，每题20分，计40分）
(1)在\销售\数据库中，根据\销售\和\商品\表查询每种商品的\商品编号\、商品名称\、\价格\、\销售数量\和\销售金额\商品编号\和\商品名称\取自\商品\表，\价格\和\销售数量\取自\销售\表，销售金额=价格*销售数量)，按\销售金额\降序排序，并将查询结果保存到xiao表中。
(2)在考生文件夹下有一个名称为my的表单文件，该表单中两个命令按钮的Click事件中语句有误。请按如下要求进行修改，修改后保存所做的修改：
①单击\更新标题\按钮时，把表单的标题改为\商品销售数据输入\②单击\商品销售输入\命令按钮时，调用当前文件夹下的名称为销售数据输入的表单文件打开数据输入表单。 【答案】
（1）在命令窗口中输入命令：MODIFY COMMAND query1，在程序文件编辑器窗口输入如下程序段： ************************************
SELECT 商品.商品编号,商品.商品名称,销售.价格,销售数量,销售.价格*销售数量 AS 销售金额;
FROM 商品,销售 WHERE 商品.商品编号=销售.商品编号 ORDER BY 销售金额 DESC INTO TABLE xiao *****************************
在命令窗口输入命令：DO query1，运行程序，通过BROWSE命令可查看结果。 （2）在命令窗口中输入命令：MODIFY FORM my，打开表单my.scx。
1）双击表单中的\更新标题\按钮，进入命令按钮的事件编辑窗口，在Click事件中程序段如下： *****************************
ThisForm.标题 = \商品销售数据输入\*****************************
修改程序中的错误，正确的程序如下： *****************************
ThisForm.Caption= \商品销售数据输入\*****************************
2）以同样的方法打开\商品销售输入\按钮的Click事件程序如下： ***************************** DO sellcomm
*****************************
修改程序中的错误，正确的程序如下： ***************************** DO Form 销售数据输入
*****************************
三、综合应用题（1小题，计30分）
在考生文件夹下，打开学生数据库SDB，完成如下综合应用：
设计一个表单名为sform的表单，表单文件名为SDISPLAY，表单的标题为\学生课程教师基本信息浏览\。表单上有一个包含三个选项卡的\页框\控件和一个\退出\按钮(Commandl)。其他功能要求如下：
(1)为表单建立数据环境，向数据环境依次添加STUDENT表、CLASS表和TEACHER表。 (2)要求表单的高度为280，宽度为450；表单显示时自动在主窗口内居中。
(3)三个选项卡的标签的名称分别为\学生表\、\班级表\和\教师表\，每个选项卡分别以表格形式浏览\学生\表、\班级\表和\教师\表的信息。选项卡位于表单的左边距为18，顶边距为10，选项卡的高度为230，宽度为420。
(4)单击\退出\按钮时关闭表单。 【答案】
在命令窗口中输入命令：CREATE FORM play，打开表单设计器，通过\表单控件\工具栏向表单添加1个页框控件和1个命令按钮。
选中表单，在属性面板中修改Caption的属性值为\学生课程教师基本信息浏览\，Heitht属性值改为300，Width属性值改为450，将AutoCenter的属性值设置为.T.，然后在属性面板顶端的下拉框中选择Command1，修改该命令按钮控件的Caption属性值为\关闭\。在属性面板顶端的下拉框中选择Pageframe1，修改其Heitht属性值为230，Width属性值为420，Left属性值为18，Top属性值为10。
在\表单设计器\工具栏中打开表单数据环境，将数据表文件cla、stu和tea添加到数据环境中。选定页框，修改PageCount属性值为3，增加一个页面，右击页框控件，选择\编辑\菜单命令，可以看到页框四周出现蓝色边框，表示处于编辑状态下，选定页面（Page1），修改页面标题Caption属性值为\学生表\，添加一个表格控件，设置表格控件Grid1的RecordSourceType属性值为\表\（用来指定显示表中的数据），RecordSource属性值为stu，然后在页框编辑状态下，以同样的方法设置第二个页面，RecordSource属性值为cla，设置第三个页面，RecordSource属性值为tea。
最后双击\关闭\按钮，在Click事件中编写程序命令：Thisform.Release，保存并运行表单。运行结果如下