全国计算机二级VF上机新题.doc

二级 Visual FoxPro_第86套上机题一、基本操作题1新建一个项目myproject。2在新建的项目myproject中建立数据库mybase。3将考生文件夹下的3个自由表全部添加到新建的mybase数据库。4在新建的项目myproject中建立一个表单，并将其保存为myform.scx（不要做其他任何操作）。【微步骤】（1）通过新建对话框新建一个项目，并保存为myproject。（2）在项目管理器中，选择数据节点下的数据库，单击右侧的新建按钮，在弹出的新建对话框中选择新建数据库，在打开的创建对话框中输入数据库文件名mybase，单击保存按钮。（3）在打开的数据库设计器空白处单击鼠标右键，选择添加表命令，将考生文件夹下的三个自由表order、orderitem以及goods依次添加到数据库中。（4）在项目管理器中，选择文档节点下的表单，单击新建按钮，在弹出的新建表单对话框中选择新建表单，这时表单设计器打开，单击常用工具栏上的保存铵钮，输入表单名myform，关闭表单设计器。二、简单应用题1在mybase数据库中建立视图myview，视图中包括客户名、订单号、图书名、单价、数量和签订日期字段。然后使用SQLSELECT语句查询：吴姓读者（客户名第一个字为吴）订购图书情况，查询结果按顺序包括myview视图中的全部字段，并要求先按客户名排序、再按订单号排序、再按图书名排序（均升序），将查询结果存储在表文件mytable中。2打开在基本操作题中建立的表单文件myform，并完成如下简单应用：1)将表单的标题设置为简单应用；2)表单运行时自动居中；3)增加命令按钮退出（Command1），程序运行时单击该按钮释放表单；4)将第1题建立的视图myview添加到数据环境中；5)将视图myview拖拽到表单中使得表单运行时能够显示视图的内容（不要修改任何属性）。【微步骤】1. 步骤1：打开mybase数据库，单击常用工具栏中的新建按钮，在打开的新建对话框中选择文件类型中的视图，单击新建文件按钮。步骤2：在添加表或视图对话框中依此添加order、orderitem以及goods表，并通过图书号以及订单号设置三表之间的联系。步骤3：在视图设计器的字段选项卡中，添加客户名、订单号、图书名、单价、数量以及签订日期字段到选定字段中。单击常用工具栏中的保存按钮，保存视图为myview。步骤4：在命令窗口中输入如下命令，并按回车执行：select * from myview;where 客户名 = 吴;into table mytable; order by 客户名,订单号,图书名按回车运行此命令。2. 步骤1：单击常用工具栏中的打开按钮，打开表单文件myform。步骤2：将表单的Caption属性设置为简单应用，将AutoCenter属性设置为.T.-真。步骤3：想表单添加一个命令按钮Command1，将其Caption属性设置为退出，双击该命令按钮，编写其Click事件代码thisform.release。步骤4：单击菜单栏显示-数据环境命令，在打开的添加表或视图对话框选择视图选项，选中视图myview，单击添加按钮，将视图myview添加到数据环境中。步骤5：选中数据环境设计器中的视图myview，用鼠标将其拖拽到表单设计器中，然后保存对表单的修改。三、综合应用题在考生文件夹下完成如下综合应用：1打开在基本操作题中建立的项目myproject；2在项目中建立程序SQL，该程序只有一条SQL查询语句，功能是：查询7月份以后（含）签订订单的客户名、图书名、数量、单价和金额(单价*数量)，结果先按客户名、再按图书名升序排序存储到表MYSQLTABLE；3在项目中建立菜单mymenu，该菜单包含运行表单、执行程序和退出3个菜单项，它们的功能分别是执行表单myform、执行程序SQL、恢复到系统默认菜单（前两项使用直接命令方式；最后一项使用过程，其中包含一条clearevents命令）；4在项目中建立程序main，该程序的第一条语句是执行菜单mymenu，第二条语句是readevents，并将该程序设置为主文件；5连编生成应用程序myproject.app；6最后运行连编生成的应用程序，并执行所有菜单项。【微步骤】步骤1：单击常用工具栏中的打开按钮，打开项目myproject。步骤2：选择项目管理器中代码节点下的程序选项，单击新建按钮，在弹出的窗口中输入： SELECT 客户名,图书名,数量,单价,单价*数量 AS 金额 ; FROM mybase!goods INNER JOIN mybase!orderitem ; INNER JOIN mybase!order ; ON Orderitem.订单号 = Order.订单号 ; ON Goods.图书号 = Orderitem.图书号 ; WHERE month(order.签订日期)=7 ; ORDER BY 客户名,图书名 INTO TABLE MYSQLTABLE 单击常用工具栏上的保存铵钮，保存对项目的修改。步骤3：选择项目管理器中其他节点下的菜单选项，单击新建按钮，在新建菜单对话框中单击菜单，在菜单设计器的菜单名称中输入运行表单，结果为命令，输入do form myform。再在菜单名称中输入执行程序，结果为命令，输入do sql。然后在菜单名称中输入退出，结果为过程，单击创建按钮，输入： set sysmenu to default clear events单击常用工具栏上的保存铵钮，保存对项目的修改。步骤4：选择项目管理器中代码节点下的程序选项，单击新建按钮，在弹出的对话框中输入： do mymenu.mpr read events单击常用工具栏上的保存铵钮，在另存为对话框中输入main，再单击保存按钮。步骤5：在项目管理器中选中程序main，单击鼠标右键，选择设置主文件，将其设置成主文件。步骤6：单击项目管理器右侧的连编按钮，打开连编选项对话框，在操作中选择连编应用程序选项，单击确定按钮。在打开的另存为对话框中输入应用程序名myproject，单击保存按钮，即可生成连编项目文件。最后运行myproject.app，并依次执行运行表单、执行程序以及退出菜单命令。二级 Visual FoxPro_第87套上机题一、基本操作题在考生文件夹下有一表单文件formonescx，其中包含一个命令按钮。打开该表单文件，然后在表单设计器环境下完成如下操作：1将表单的标题设置为基本操作；将表单的最大化按钮设置为无效。2在表单的数据环境中添加数据表customersdbf。3将命令按钮设置为默认按钮，即在表单激活的情况下，不管焦点在哪个控件上，都可以通过按Enter键来选择该命令按钮。4在命令按钮的上方添加一个基于用户自定义类mytextbox的控件(不需要做任何设置)。类mytextbox存储在考生目录下的类库文件myclasslibvcx中。(提示：在表单控件工具栏中单击“查看类”按钮添加类库。)【微步骤】（1）单击常用工具栏中的打开按钮，打开表单formone，将表单的Caption属性设为基本操作，将其MaxButton属性设置为.F.-假。（2）单击菜单栏显示-数据环境命令，在打开对话框中选择customers.dbf，单击确定按钮，关闭添加表或视图对话框，在数据环境设计器中拖拽customers.dbf至表单中。（3）将命令按钮的Default属性值设置为.T.-真。（4）选中菜单栏工具-选项命令，在选项对话框中选择控件选项卡，再选择可视类库单选按钮，然后单击添加按钮。在打开对话框中，选择考生文件夹下的类库文件myclasslib.vcx。单击表单控件工具栏上的查看类按钮，然后选择myclasslib，在命令按钮的上方添加一个mytextbox的控件。二、简单应用题1编写SELECT语句，从orders（订单）表中统计2007年各月份签订的订单数。统计结果依次包含月份和订单数两个字段，并按月份升序排序，统计结果存放在tableone表中。最后要执行该SELECT语句，并将该SELECT语句存放在命令文件poneprg中。2首先创建数据库goods_m，并向其中添加goods（商品）表。然后在数据库中创建视图viewone：利用该视图只能查询单价大于等于2000且库存量小于等于2、或者单价小于2000且库存量小于等于4的商品信息，查询结果依次包含商品号、商品名、单价和库存量四项内容，各记录按商品号升序排序。最后利用该视图查询视图中的全部信息，并将查询结果存放在表tabletwo中。【微步骤】1.【微步骤】步骤1：在命令窗口中输入如下命令，然后按回车执行： select month(签订日期) as 月份,count(订单号) as 订单数 from orders ; where year(签订日期)=2007 group by 月份 order by 月份 into table tableone步骤2：运行该SQL语句，然后将此语句保存在pone.prg文件中。2.【微步骤】步骤1：单击常用工具栏中的新建按钮，在新建对话框中选择数据库单选按钮，保存为goods_m。步骤2：在数据库设计器空白处单击鼠标右键，在弹出的快捷菜单中选择添加表命令，在打开对话框中选择goods表，单击确定按钮。步骤3：在命令窗口中输入create VIEW，然后按回车执行，打开视图设计器，在添加表或视图对话框中选中goods表，单击添加按钮，并关闭该对话框。步骤4：在视图设计器的字段选项卡中，添加商品号、商品名、单价以及库存量4个字段到选定字段中；切换到筛选选项卡，设置筛选条件如下：字段名 条件实例 逻辑 Goods.单价 = 2000 ANDGoods.库存量 = 2 ORGoods.单价 2000 ANDGoods.库存量 =ctod(thisform.Text1.Text) ; ORDER BY 签订日期,orders.订单号,商品名 ;INTO TABLE tablethree.dbf* 步骤4：保存并运行表单，在文本框中输入01/10/2007，并单击查询命令按钮。二级 Visual FoxPro_第88套上机题一、基本操作题1新建一个不包含任何控件的空表单myformscx（表单名和表单文件名均为myform）。2打开表单文件formtwoscx，将表单的标题设为计算机等级考试。3打开表单文件formthreescx，使用布局工具栏操作使表单上的4个命令按钮按顶边水平对齐。4打开表单文件formfourscx，设置有关属性使表单初始化时自动在VisualFoxPro主窗口内居中显示。【微步骤】（1）单击常用工具栏上的新建按钮，新建一个表单，将表单的Name属性修改为myform，单击常用工具栏中的保存按钮，将表单保存并命名为myform.scx。（2）单击常用工具栏中的打开按钮，打开formtwo.scx，然后将表单的Caption属性修改为计算机等级考试，再单击保存按钮。（3）单击常用工具栏中的打开按钮，打开formthree.scx，选择菜单栏显示-布局工具栏命令，显示出布局工具栏。选中表单上的4个命令按钮，单击布局工具栏上的顶边对齐按钮，再单击保存按钮。 （4）单击常用工具栏中的打开按钮，打开formfour.scx，然后将表单的AutoCenter属性值设置为.T.-真，再单击保存按钮。二、简单应用题1使用查询设计器设计完成：查询吴姓读者（客户名第一个字为吴）订购图书情况，查询结果包括客户名、订单号、图书名、单价、数量和签订日期字段的值，要求按客户名升序排序，并运行该查询将查询结果存储在表文件appone，查询文件也保存为appone。2使用SQL语句查询每个读者订购图书的数量和金额（数量*单价），查询结果包括客户名、订购总册数和金额，查询按金额降序排序，查询结果存储在apptwodbf表文件，最后将SQL语句保存在apptwoprg命令文件。【微步骤】1.步骤1：单击常用工具栏中的新建按钮， 新建查询。在查询设计器中右击空白处，选择添加表命令，依次将order、orderitem以及goods表添加到查询中，默认建立三表间的联系。步骤2：在字段选项卡中，依次将Order.客户名、Order.订单号、Goods.图书名、Goods.单价、Orderitem.数量、Order.签订日期添加到选定字段中；在筛选选项卡下，在字段名中选择Order.客户名，条件选择=，实例中输入：吴；切换到排序依据选项卡并在其中选择字段Order.客户名，排序选项为升序。步骤3：单击菜单栏查询-查询去向命令，在查询去向对话框中选择表，在表名文本框框中输入表名appone。步骤4：单击常用工具栏中的保存按钮，在另存为对话框中输入appone。最后运行该查询。2.步骤1：在命令窗口中输入如下语句，然后按回车执行： SELECT Order.客户名, sum(orderitem.数量) as 订购总册数,; sum(orderitem.数量* Goods.单价) as 金额 ; FROM goods INNER JOIN orderitem INNER JOIN order ; ON Orderitem.订单号 = Order.订单号 ; ON Goods.图书号 = Orderitem.图书号 ; GROUP BY Order.客户名 ; ORDER BY 金额 DESC ; INTO TABLE apptwo.dbf步骤2：通过新建对话框新建一个txt文件apptwo.prg，然后将此语句保存此文件中。三、综合应用题在考生文件夹下完成如下综合应用：1建立数据库订单管理；2将表order、goods和orderitem添加到订单管理数据库；3在订单管理数据库中创建视图orderview，该视图包含信息：客户名、订单号、图书名、数量、单价和金额（单价*数量）；4建立文件名和表单名均为orderform的表单，在表单中添加表格控件grid1（将RecordSourceType属性设置为表）和命令按钮退出（command1）；5在表单的load事件中使用SQL语句从视图orderview中按客户名升序、金额降序查询数量为1的客户名、图书名和金额信息，并将结果存储到表文件resultdbf；6在表单运行时使得在控件grid1中能够显示表resultdbf中的内容（在相应的事件中将grid1的recordsource属性指定为resultdbf）；7单击“退出”命令按钮时释放并关闭表单。完成以上所有功能后运行表单orderform。【微步骤】步骤1：单击常用工具栏中的新建按钮，新建一个数据库订单管理。步骤2：在数据库设计器中右击空白处，选择添加表命令，在打开对话框中依次将order、goods以及orderitem表添加到数据库中。步骤3：在命令窗口中输入create VIEW命令，然后按回车执行，打开视图设计器，在添加表或视图对话框中依次添加order、orderitem以及goods表，并设置三表间的联系；在视图设计器的字段选项卡中将order.客户名、order.订单号、goods.图书名、orderitem.数量、goods.单价5个字段添加到选定字段，再在函数以及表达式文本框中输入：goods.单价 * orderitem.数量 AS 金额，单击添加按钮。单击常用工具栏中的保存按钮，将视图保存并命名为orderview。步骤4：在命令窗口输入命令CREATE FORM orderform，然后按回车执行，打开表单设计器，修改表单的Name属性为orderform。步骤5：想表单上添加一个表格以及一个命令按钮控件，并进行适当的布置以及大小调整。设置表格的RecordSourceType属性为0-表，命令按钮的Caption属性设置为退出。步骤6：双击表单空白处，选择Losd事件，在表单的load事件代码中输入： select 客户名,图书名,金额 from orderview where 数量=1 ; order by 客户名,金额 desc into table result.dbf步骤7：双击表单空白处，选择activatecell事件，输入代码： thisform.Grid1.recordsource=result.dbf步骤8：双击退出命令按钮，编写其Click事件代码： THISFORM.RELEASE步骤九：单击常用工具栏中的保存按钮，保存并运行表单。二级 Visual FoxPro_第89套上机题一、基本操作题在考生文件夹下完成下列操作：1新建一个名为学校的数据库文件，将自由表教师表、职称表和学院表添加到该数据库中。2在学校数据库文件中，为职称表建立主索引，索引表达式为职称级别，索引名为indexone。3使用报表向导为职称表建立一个报表myreport，选定职称表的全部字段，按职称级别字段降序排序，其他选项选择默认值。4修改testprg中的语句，该语句的功能是将职称表中所有职称名为教授的记录的基本工资存储于一个新表profdbf中，新表中包含职称级别和基本工资两个字段，并按基本工资升序排列。最后运行程序文件testprg。【微步骤】(1)单击常用工具栏新建按钮或选择菜单栏文件-新建命令，新建一个数据库，在弹出的对话框中输入文件名学校。在打开的数据库设计器中，右键单击数据库空白处，选择添加表命令，将考生文件夹下的教师表、职称表和学院表添加到数据库中。(2)在数据库设计器-学校中，右键单击职称表，选择修改命令，在打开的表设计器中，单击索引选项卡，输入索引名称职称级别，类型设为主索引，表达式为职称级别。单击确定按钮保存对表的修改。(3)单击常用工具栏新建按钮，新建一个报表，使用报表向导新建报表。在步骤1-字段选取中，将职称表的全部字段添加到选定字段中。其他步骤默认，直接单击下一步。在步骤5-排序记录选项卡下，设置按职称级别降序排列。在步骤6-完成中，单击完成按钮。然后单击常用工具栏保存按钮，输入报表名称myreport。(4)单击常用工具栏打开按钮，打开考生文件夹下的程序文件test.prg，根据题目要求将select 职称级别,基本工资 from 职称表 where 职称名=教授 to dbf prof.dbf group by 基本工资修改为select 职称级别,基本工资 from 职称表 where 职称名=教授 into dbf prof.dbf Order by 基本工资。然后单击常用工具栏的运行按钮，运行程序。二、简单应用题在考生文件夹下完成下列操作：1请修改并执行程序tempprg，该程序的功能是：根据教师表和职称表计算每位教师的应发工资，每位教师的应发工资等于：与职称级别相符的基本工资+课时80职称系数，教授的职称系数为14，副教授的职称系数为13，讲师的职称系数为12，助教的职称系数为10。计算结果存储于自由表salarydbf中，salarydbf中的字段包括姓名、系号和应发工资，并按系号降序排列，系号相同时按应发工资升序排列。注意，只能修改标有错误的语句行，不能修改其他语句行。2创建一个新类MyCheckBox，该类扩展VisualFoxpro的CheckBox基类，新类保存在考生文件夹下的myclasslib类库中。在新类中将Value属性设置为1。新建一个表单MyForm，然后在表单中添加一个基于新类MyCheckBox的复选框，如图所示。【微步骤】1.打开考生文件夹下的程序文件temp.prg，根据题目要求修改SQL语句如下：第一处错误：create 职称系数表 (职称名 c(6),职称系数 f(10,2)修改为：create table 职称系数表 (职称名 c(6),职称系数 f(10,2)第二处错误：insert into 职称系数表 value (教授 ,1.3)修改为：insert into 职称系数表 value (副教授 ,1.3)第三处错误：FROM 职称系数表,教师表;修改为：FROM 职称表,职称系数表,教师表; 第四处错误：OR 职称表.职称名 = 职称系数表.职称名; 修改为：AND 职称表.职称名 = 职称系数表.职称名; 保存对程序的修改并运行。2. 步骤1：通过新建对话框新建一个类文件。步骤2：在弹出的新建类对话框中，输入类名MyCheckBox，在派生于下拉列表中选择checkbox，单击存储于文本框后的按钮，在打开的另存为对话框选择考生文件夹，输入文件名myclasslib，单击确定按钮。步骤3:打开类设计器窗口，进入类设计器环境，将Value属性为1。然后关闭类设计器。步骤4: 通过新建对话框新建一个表单,在表单设计器中，单击表单控件工具栏中查看按钮，选择添加命令，在弹出的对话款中打开myclassib。然后在表单控件工具栏中单击checkbox按钮,向表单添加一个复选框按钮。单击常用工具栏的保存按钮，保存表单为myform。三、综合应用题在考生文件夹下完成下列操作：1建立一个文件名和表单名均为formtest的表单，表单中包括一个标签（Label1）、一个列表框（List1）、一个表格（Grid1）。2在表单的数据环境中添加学院表和教师表。3通过属性窗口将标签的标题设为系名。4列表框用于显示系名，通过属性窗口将列表框（List1）的RowSource和RowSourceType属性指定为学院表系名和6。5表格用于显示所有教师的相关信息，通过属性窗口将表格（Grid1）的RecordSource和RecordSourceType属性指定为select职工号,姓名,课时from教师表intocursortmp和4。6为列表框（List1）的DblClick事件编写程序。程序的功能是：表单运行时，用户双击列表框中的选项时，将所选系教师的职工号、姓名和课时三个字段的信息存入自由表twodbf中，表中的记录按职工号降序排列。7运行表单，在列表框中双击信息管理。【微步骤】步骤1：通过新建对话框新建一个表单，向表单添加一个标签、一个列表框和一个一个表格控件，适当调整各控件的大小及位置。步骤2：在表单空白处单击鼠标右键，选择数据环境命令，将学院表和教师表添加到数据环境中。步骤3：在表单设计器窗口下，将标签（Label1）控件的caption属性修改为系名。将列表框（List1）控件的RowSource属性设为学院表.系名，RowSourceType属性改为6。步骤4：在表单设计器下，将表格（Grid）控件的RecordSource属性设为select 职工号，姓名，课时 from 教师表 into cursor tmp，RecordSourceType属性设为4。步骤5：双击列表框控件（List1），编写其Dblclick事件代码如下：*列表框控件的Dblclick事件代码*Thisform.Grid1.RecordSource=SELECT 职工号,姓名,课时 FROM 学院表,教师表;WHERE 学院表.系号=教师表.系号;AND 系名=ALLTRIM(Thisform.List1.Value) INTO table two.dbf;order by 职工号 DESC *步骤6：保存表单并命名为formtest，然后单击常用工具栏的运行按钮，运行表单。根据题目要求，在列表框中双击信息管理。二级 Visual FoxPro_第90套上机题一、基本操作题1在考生文件夹下人事管理数据库中，为职工表中的性别字段设置有效性规则，只能取男或女；默认值是男。2建立快捷菜单cd，选项有打开、关闭和退出。生成同名的菜单程序文件。3为职工表加入一个普通索引，索引名和索引表达式均为部门编号，升序。4为职工表和部门表建立联系，定义参照完整性规则：删除规则为级联，更新规则和插入规则为限制。【微步骤】(1)单击菜单栏文件-打开命令，打开考生文件夹下名为人事管理的数据库。右键单击职工表，选择修改命令，在打开的表设计器中，将鼠标放在性别一行，在字段有效性下的规则一栏输入性别=男.OR.性别=女，在默认值处输入男。(2)通过新建对话框新建一个菜单，并在弹出的对话框中选择快捷菜单。分别输入三个菜单名称打开、关闭和退出，保存菜单并命名为cd。然后单击菜单栏菜单-生成命令，生成可执行文件。(3)在数据库设计器-人事管理中，右键单击职工表，选择修改命令，在打开的表设计器中，单击索引选项卡，输入索引名部门编号，类型设为普通索引，表达式为部门编号，单击确定按钮保存对表的修改。(4)在数据库设计器-人事管理中，将部门表的主索引部门编号用鼠标拖拽到职工表的普通索引部门编号处，松开鼠标即可建立两边见联系。选择菜单栏数据库-清理数据库命令，然后右键单击两表间的联系线，选择编辑参照完整性，在编辑参照完整性生成器对话框中，依次选中更新规则选项卡下的限制单选按钮、删除规则选项卡下的级联单选按钮、插入规则选项卡下的限制单选按钮，最后单击确定按钮。二、简单应用题1编写程序文件prgoneprg，其功能是从人事管理数据库的相关表中查询销售部从1985年到1989年这5年出生的所有职工的信息，并存到表cyqkdbf中。查询结果包含编号、姓名、出生日期和部门名称（部门表中的名称）4个字段；按职工的出生日期和编号升序排序。最后运行该程序。2扩展基类ListBox，创建一个名为MyListBox的新类。新类保存在名为Myclasslib的类库中，该类库文件存放在考生文件夹下。设置新类的Height属性的默认值为120，Width属性的默认值为80。【微步骤】1.单击常用工具栏的新建按钮，新建一个程序文件，编写命令语句如下：*程序*SELECT 职工.编号,职工.姓名 as 姓名, 职工.出生日期, 部门.名称 as 部门名称; FROM 人事管理!部门 INNER JOIN 人事管理!职工; ON 部门.部门编号 = 职工.部门编号; WHERE year(职工.出生日期) = 1985; AND year(职工.出生日期) = 1989