vf题库对应答案.doc

第90套一、 基本操作1规则写：性别=”男” OR 性别=”女” 默认值写： “男”2选择菜单 新建菜单快捷菜单 在菜单名称栏依次输入 打开、关闭、退出 单击保存，输入菜单名称 cd.mnx 单击菜单 菜单生成输入cd.mpr3打开数据库“人事管理” 右击 职工 表，选择 修改 选中部门编号后对应的 升序 索引4从部门表的部门编号索引 拖动至 职工表的部门编号索引 从数据工作期关闭数据库中的所有表 选择菜单 数据库清理数据库 选择菜单 数据库编辑参照完整性 在参照完整性生成器中，分别设置三个规则为级联、限制、限制二、 简单应用1 新建程序文件，保存为prgonePrg 内容为：SELECT编号,姓名,出生日期, 名称 AS 部门名称 ;FROM 部门JOIN职工 ;ON 部门.部门编号 = 职工.部门编号 ;WHERE 名称 = 销售部 ;AND year(出生日期) BETWEEN 1985 AND 1989 ;ORDER BY 出生日期, 编号 ;INTO TABLE cyqk2输入命令create class mylistbox of myclasslib as listbox在属性窗口中设置height 为120 Width为80 保存退出三、 综合应用新建一个表单，保存为pformScx 设置表单属性 name值为formone Caption 值为 人员查询界面元素分别按要求设置其caption 和name值 设置gridone的recordsourcetype属性为4-sql说明查询 按钮的click代码为bm=alltrim(thisform.textone.value)thisform.gridone.recordsource= ;SELECT 姓名, 性别, 出生日期, 编号 ; FROM 部门 JOIN 职工 ; ON 部门.部门编号 = 职工.部门编号 ; where 名称=bm ; ORDER BY 职工.编号 ; INTO TABLE tableone退出按钮的click代码为:Thisform.release第89套一、 基本操作1 选择菜单 新建数据库新建文件 输入数据库文件名 学校 在数据库设计器中右击,选择 添加表 依次将三个表加入2 在数据库设计器中 对着 职称表 右击 选择修改进入表设计器，单击索引标签 ，索引名称输入Indexone， 索引类型选择 主索引 ，索引表达式输入 职称级别 3 选择菜单 新建报表向导(按向导指引一步步选择)4 打开程序文件testPrg，修改为：select 职称级别,基本工资 from 职称表 where 职称名=教授 into dbf prof.dbf order by 基本工资二、 简单应用1 打开tempprg 修改后为：create table 职称系数表 (职称名 c(6),职称系数 f(10,2) &有错误insert into 职称系数表 value (教授 ,1.4)insert into 职称系数表 value (副教授 ,1.3) &有错误insert into 职称系数表 value (讲师 ,1.2)insert into 职称系数表 value (助教 ,1.0)SELECT 姓名, 系号,课时*80*职称系数+基本工资 as 应发工资;FROM 职称系数表,教师表,职称表; &有错误 WHERE 职称表.职称级别 = 教师表.职称级别 ; and 职称表.职称名 = 职称系数表.职称名; &有错误 into dbf salary.dbf; order by 系号 desc,应发工资2 输入命令create class mycheckbox of myclasslib as checkbox右击进入属性窗口，设置value为1，保存退出新建一个表单，保存为myform选择菜单 显示菜单控件工具栏，单击第二列第一个按钮（查看类）选择添加，选择myclasslib.VCX并打开，选择复选框工具，并拖出一个对象，最后保存。三、 综合应用1新建表单，文件名为formtest 设置表单name 值也为formtest ；画出表单中各元素2右击选择数据环境，依次添加 学院表 和教师表3设置label1的caption 属性为 系名4设置list1的rowsource和rowsourcetype分别为 学院表系名 和 65. Grid1的RecordSource和RecordSourceType属性指定为select 职工号,姓名,课时 from 教师表 into cursor tmp和4。6List1的dblclick代码为：xm=alltrim(thisform.list1.value)thisform.grid1.recordsource=;SELECT 教师表.职工号, 教师表.姓名, 教师表.课时 ; FROM 学校!教师表 INNER JOIN 学校!学院表 ; ON 教师表.系号 = 学院表.系号 where 系名=xm ; ORDER BY 教师表.职工号 DESC INTO TABLE two第88套一、 基本操作1 新建表单，保存为myformScx 设置表单name属性的值为myform2 打开表单formtwoScx 设置表单的caption 属性值为“计算机等级考试”3 打开表单formthreeScx 选择菜单 显示布局工具栏，同时框选表单上的4个命令按钮，再选择布局工具栏中的顶边对齐。4 打开表单formfourScx 设置表单autocenter 属性为 T二、 简单应用1 新建查询，向查询设计器中依次添加goods,orderitem,order三张表在字段标签中选择客户名、订单号、图书名、单价、数量、签订日期在筛选标签中设置 客户名 like “吴%”在排序依据标签中选择客户名，设为升序选择菜单 查询查询去向表，输入表名为appone保存查询文件为appone，并运行.2 新建程序文件apptwo.prg向其中输入以下代码： SELECT 客户名, sum(数量) as 订购总册数,sum( Orderitem.数量* Goods.单价) as 金额 ; FROM goods JOIN orderitem JOIN order ; ON Orderitem.订单号 = Order.订单号 ON Goods.图书号 = Orderitem.图书号 ; GROUP BY 客户名 ORDER BY 3 DESC INTO TABLE apptwo.dbf保存并执行。三、综合应用1、新建数据库 “订单管理”。2、在数据库设计器中右击，依次添加goods,orderitem, order表3、新建本地视图,在设计器中依次添加goods,orderitem,order三张表,在字段标签中选择：客户名、订单号、图书名、数量、单价，在函数和表达式里输入 单价*数量 as 金额 并添加过去,保存视图为orderview并查看结果4新建表单，保存为orderform 设置name属性为orderform,在表单中添加表格grid1,设置recordsourcetype 属性为”表”,添加命令按钮command1设置其caption为 退出5双击表单进入表单的load事件代码，并输入 Select 客户名，图书名，金额 from orderview where 数量=1 ；order by 客户名，金额 desc into table result 5 进入表单的init事件代码，并输入ThisformGrid1recordsource=”result”6 进入 退出 按钮的click 事件代码，输入ThisformRelease7运行表单第87套一、 基本操作打开表单文件formone1 设置表单caption属性为“基本操作”设置maxbutton属性为.f.2 表单中右击选择数据环境，添加customers3 设置 确认 按钮的 default 属性为.t.4 单击控件工具栏中的“查看类”按钮，选择“添加”，选中“myclasslib.VCX”，并打开，在表单中拖出一个mytextbox控件即可。二、 简单应用1 新建一个程序文件pone.prg 内容如下：SELECT month(签订日期) as 月份, count(*) as 订单数 ; FROM orders GROUP BY 1 ORDER BY 1 INTO TABLE tableone最后执行该程序文件。2 新建一个数据库goods_m，在数据库设计器中右击，添加一个表goods.右击新建本地视图，添加goods表至视图设计器，字段标签中依次选择 商品号，商品名、单价、库存量筛选标签中设置为排序标签中选择商品号升序保存视图为viewone在命令窗口输入：select * from viewone into table tabletwo三、 综合应用新建表单，保存为 fromtwo 向其中添加 标签、文本框、命令按钮三个控件1 设置label1的caption 为 日期,command1的caption为 查询2 设置文本框的value属性为 =date()3 双击command1,进入其click事件代码,输入:rq=thisform.text1.value SELECT 签订日期, Orders.订单号, 姓名 AS 客户名, 商品名, 单价, 数量; FROM goods JOIN orderitems JOIN orders JOIN customers ; ON Orders.客户号 = Customers.客户号 ON Orderitems.订单号 = Orders.订单号 ; ON Goods.商品号 = Orderitems.商品号; where 签订日期=rq ORDER BY 签订日期, Orders.订单号, 商品名; INTO TABLE tablethree第86套一、 基本操作1 新建项目myproject2 项目管理器中选择 数据数据库新建，创建mybase数据库3 在数据库设计器中，右击，添加三张自由表4 关闭数据库设计器，在项目管理器中，选择 文档表单新建建立一个表单，保存为myform，最后关闭项目管理器二、 简单应用 1打开mybase数据库，在数据库设计器中右键选择新建本地视图。向视图设计器中依次添加goods,orderitem,order三张表。在字段标签中依次选择 客户名、订单号、图书名、单价、数量、签订日期保存视图为myview在命令窗口中输入以下命令：select * from myview where 客户名 like 吴% ;order by 客户名,订单号,图书名 into table mytable2打开表单myform 设置表单caption属性为“简单应用” 设置表单autocenter属性为.t. 添加一个命令按钮command1,在其click事件代码中输入thisformRelease 右键选择“数据环境”，将myview添加进去 从数据环境中直接拖动myview至表单中。三、 综合应用1打开项目myproject2在项目中新建程序，内容为：SELECT客户名,图书名,数量,单价,单价*数量 as 金额; FROM goods JOIN orderitem JOIN order ; ON Orderitem.订单号 = Order.订单号 ON Goods.图书号 = Orderitem.图书号; WHERE month(签订日期) = 7; ORDER BY Order.客户名, Goods.图书名 INTO TABLE mysqltable保存程序文件为：sql3 在项目中新建菜单mymenu运行表单的命令中输入：do form myform执行程序的命令中输入：do sql退出的过程中输入： Set sysmenu nosave Set sysmenu to default Clear events选择 菜单生成，以生成菜单程序文件mymenu.mpr4 在项目中建立程序main 内容为：Do mymenu.mprRead events保存关闭程序文件，在main上右键选择设为主文件5 在项目管理器中选择 连编连编应用程序myprojectApp执行连编后的文件: do myproject.app 以测试效果第85套一、 基本操作打开表单formone1 选择菜单 显示布局工具栏，框选表单中的两个控件，在布局工具栏中选择顶边对齐2 设置文本框value属性为03 设置表单caption属性为“基本操作”，命令按钮caption 属性为“确定”4 进入文本框的interactivechange事件代码，输入：If thisform.text1.value4500 order by 职工号 to file one.txt 新建程序文件two.prg 复制粘贴刚才的命令。4 略二 简单应用1 修改后的程序文件为：&下句只有一处有错误SELECT 系号 FROM 学院表 where 系名=信息管理 INTO ARRAY a&下句只有一处有错误use 教师表STORE 0 TO sumSTORE 0 TO num&下句只有一处有错误SCAN for 系号=a sum=sum+工资&下句缺少一句 num=num+1ENDSCAN?sum/num2 打开数据库college,在数据库设计器中右键新建本地视图，依次添加 课程表，教师表，学院表建立视图的其余步骤略。最后在命令窗口输入：select * from coursr_v into table se三 综合应用1 新建表单，保存文件名为oneform，设置表单name值为oneform，自己创建界面2 在表单中右键选择数据环境，添加“学院表”， 设置combo1的rowsourcetype属性为6， rowsource属性为“学院表.系名”3 “生成”按钮的click事件代码为： xm=alltrim(thisform. combo1.value)if thisform. optiongroup1.value=1 SELECT 系名, 学院表.系号, avg(工资) as 平均工资; FROM 学院表 JOIN 教师表 ON 学院表.系号 = 教师表.系号; where 系名=xm INTO TABLE salaryelse SELECT 系名, 学院表.系号, sum(工资) as 总工资; FROM 学院表 JOIN 教师表 ON 学院表.系号 = 教师表.系号; where 系名=xm INTO TABLE salaryendif4 “退出”按钮的click事件代码为： thisform.release5 按题目要求运行。第80套一 基本操作1略 2 略 3 略4 新建程序文件 pone.prg 内容为： Index on 客户号 tag khh （记得保存运行）二 简单应用1 设置 表单 caption为 “表单简单应用”，label1的caption为“日期”，command1的caption为“查询”2 设置text1的value属性为：=date()3 “查询”按钮的click事件代码为： Select 姓名,性别,出生日期 from customers order by 出生日期 desc into table tableone 按题目要求运行。2 打开订单管理数据库，右键添加orderitem表，右键新建本地视图，向视图中添加orderitem表字段标签选择 商品号，函数和表达式中输入 sum(数量) as 订购总量 并点添加分组依据选择 商品号 排序选择商品号 升序选择菜单 查询查询去向表tabletwo，最后保存运行。三 综合应用新建表单，保存文件名为myform,表单的caption属性为“考试”，showwindow属性为“2-作为顶层表单”进入表单的load事件代码，输入：Do mymenu.mpr with this(注意：此时不要运行表单，否则出错)新建菜单 保存为mymenu.mnx选择 显示常规选项顶层表单“计算”的过程代码为：SELECT 订单号, sum(数量*单价) as 总金额 FROM goods JOIN orderitems ; ON Goods.商品号 = Orderitems.商品号 GROUP BY 订单号 INTO TABLE temp select temp go top scan update orders set 总金额=temp.总金额 where 订单号=temp.订单号 endscan“退出”的过程代码为：myform.release选择 菜单生成，生成菜单程序文件mymenu.mpr运行表单。第79套一 基本操作打开表单formone1 设置表单caption属性为“表单操作”，设置命令按钮的caption属性为“显示”2 设置文本框的vlaue值为0，width值为603 设置文本框的inputmask属性为：99999.994 命令按钮的click事件代码应修改为： wait str(thisform.text1.value,8,2) window二 简单应用1 新建程序文件pone.prg，代码如下：select year(出生日期) as 年份,count(*) as 人数 from customers ;group by 年份 order by 年份 into table tableone最后保存并执行2 新建数据库orders_m，添加表customers和orders在数据库设计器中右键新建视图，添加customers和orders字段标签中依次选择 订单号，签订日期，姓名，联系电话筛选条件设置为 year(签订日期) = 2007排序设为 签订日期 降序保存视图为viewone在命令窗口输入 select * from viewone into table tabletwo三 综合应用打开程序ptwo.prg需要添加的5条命令依次为：set relation to 商品号 into goods_t &语句 1set relation to 订单号 into orderitems &语句 2if 数量goods_t.库存量 &语句 3skip -n &语句 4replace 库存量 with 库存量-orderitems.数量 &语句 5第78套一 基本操作1 在命令窗口执行： use employeecopy stru to emp_bak2 INDEX ON 职员号 TAG empid CANDIDATE3 略4 显示报表文件可用的语句是：report form employee preview 并把此语句存放到one.prg中。二 简单应用1 略2 程序已经给出第2和第3行有错，所以应改为： 第2行：from employee p join employee c ; 第3行：on p.组别=c.组别 where c.职务=组长 and c.姓名p.姓名;三 综合应用（一）、建立表单 1. 在命令窗口输入建立表单的命令 CREATE FORM _three 2. 在“表单设计器”中，添加一个标签Label1，在标签Label1“属性”窗口的Caption处输入“输入职员号”，在Name处“Ln”。 3. 在“表单设计器”中，添加一个文本框，其Name为：“Textn”。 4. 在“表单设计器”中，添加一个命令按钮，其Name为：“Commands”，其Caption为：“开始查询”双击“开始查询”命令按钮，在“Commands.Click”编辑窗口中输入下列语句，接着关闭编辑窗口。 emp=thisform.textn.value select 订单号,客户号,签订日期,金额 from order where 职员号=emp ；order by 签订日期 into dbf t&emp thisform.release（二）、建立菜单 1. 在命令窗口输入建立菜单的命令 CREATE MENU mymenu 2. 在“新建菜单”对话框中，单击“菜单”，在“菜单设计器”窗口的“菜单名称”下分别输入菜单项名“查询”和“退出”。 3. “退出”菜单项的“结果”处选择“命令”，在“选项”处输入“do form _three”。 4. “退出”菜单项的“结果”处选择“命令”，在“选项”处输入“set sysmenu to defa” 5. 选择菜单 菜单生成 ，生成mymenu.mpr文件第77套一 基本操作1 略2 在程序的第2行发现循环的条件不正确，应改为：DO WHILE i=13 新建表单后选择菜单 表单快速报表 进行操作4 ALTER TABLE 教师表 ALTER 职工号 SET CHECK LEFT(职工号,4)=1102并将语句存放到three.prg文件中。 二 简单应用1 本小题共有4个语句是错误的。 第1处：CREATE TABLE 工资表(职工号 C(8) PRIMARY KEY,姓名 C(6) ,工资 N(10.2) 第2处：INSERT INTO 工资表 VALUES (11020034,宣喧,4500) 第3处：UPDATE 工资表 SET 工资=工资*1.1 WHERE 工资=1二 简单应用1 temp.prg文件中共有4处需要修改： 1. SELECT 课程号 FROM 课程表 WHERE 课程名=数据结构 INTO ARRAY a 2. USE 教师表 3. SCAN FOR 课程号=a AND 工资=4000 4. sum=sum+12 略三 综合应用1.建立表单oneform 设置其Name 属性为“oneform”。 2. Label1的Caption “属性”为“工资”， Label2 的Caption属性为“实例”。 3.选项按钮组中， Option1的Caption为“大于等于”，Option2的Caption为“小于”。4.组合框”Combo1的RowSourceType属性“5 - 数组”。RowSource处输入“a”5. 进入表单的load事件代码，输入 Public a(3) a(1)=3000 a(2)=4000 a(3)=5000 输入后并保存。 6. Command1的Caption 属性为 “生成”，Command2的Caption属性为 “退出”。 7. 进入command1的click事件代码，输入： if thisform.optiongroup1.option1.value=1 select * from 教师表 where 工资=val(bo1.value) into dbf salary order by 工资 desc,姓名 else select * from 教师表 where 工资val(bo1.value) into dbf salary order by 工资 desc,姓名 endif 8. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“ThisForm.Release”，接着关闭编辑窗口。第75套一 基本操作1 新建“订单管理”数据库，在数据库设计器中右键添加orders，orderitem，goods三张表2 命令窗口依次输入命令 Use order Index on year(签订日期) tag nf3 略 4 略二 简单应用1 新建查询，向查询设计器中依次添加order，orderitem，goods三张表 字段标签中依次选择订单号，客户名，签订日期，商品名，单价，数量 排序标签选择 订单号 降序，商品名 降序 选择菜单 查询查询去向表tableone 保存查询文件为queryone.qpr 并运行。2 确定按钮的click事件代码为：select order.订单号,签订日期,goods.商品名,goods.单价,orderitem.数量 ; from order, orderitem, goods ; where order.订单号=orderitem.订单号 and orderitem.商品号=goods.商品号 and 客户名=thisform.text1.value ; order by order.订单号,商品名 ; into table tabletwo 最后按要求运行表单。三 综合应用 新建菜单mymenu.mnx 按题目要求设计界面 选择菜单 显示常规选项追加 “计算”的过程代码为： SELECT 商品号, sum(数量) as 数量 FROM order JOIN orderitem ; ON Order.订单号 = Orderitem.订单号 ;where year(签订日期)=2001 GROUP BY 商品号 INTO table temp SELECT 商品名, 单价* 数量 as 总金额 FROM goods LEFT JOIN temp ; ON Goods.商品号 = Temp.商品号 order by 商品名 INTO TABLE tablethreeupdate tablethree set 总金额=0 where 总金额 is null “返回”的过程代码为： Set sysmenu nosave Set sysmenu to default保存菜单 选择 菜单生成mymenu.mpr命令窗口中运行菜单 do mymenu.mpr第74套一 基本操作打开表单myform1 设置表单name属性为myform，caption属性为“表单操作”2 选中Label1标签，在其“属性”的TabIndex处输入“1”，选中Text1文本框，在其“属性”的TabIndex处输入“2”，选中Command1命令按钮，在其“属性”的TabIndex处输入“3”3 选择菜单 表单新建方法程序名称中输入：mymethod添加关闭 在表单的属性中，单击“方法程序”选项卡，找到mymethod,双击打开，输入： wait 文本框的值是+this.text1.value window4 设置 标签控件的caption属性为：请输入(s) 进入表单的 click事件代码，输入 Thisform.mymethod二 简单应用1 新建查询，向查询设计器中依次添加order，orderitem，goods三张表 字段标签中依次选择订单号，客户名，签订日期，商品名，单价，数量 函数和表达式中输入：单价*数量 as 金额 ，然后单击添加 排序标签选择 订单号 降序，商品名 降序 选择菜单 查询查询去向表tableone 保存查询文件为queryone.qpr 并运行。2 创建视图的过程略 创建完视图后在命令窗口输入： Select * from viewone into table tabletwo三 综合应用1. 在命令窗口中输入建立表单命令 CREATE FORM formone2. 在“表单设计器”中，在其“属性”的Caption处输入“综合应用”。3. 在“表单设计器”中，添加一个标签Label1，在其“属性”的Caption处输入“商品号:”。4. 在“表单设计器”中，分别添加一个文本框Text1和一个命令按钮Command1，在其“属性”的Caption处输入“确定”。5. 双击“确定”按钮，在“Command1.Click”编辑窗口中输入下列程序 Sph=alltrim(thisform.text1.value)SELECT Order.*, Goods.商品名, Goods.单价, Orderitem.数量 ; FROM order JOIN orderitem JOIN goods ; Where Goods.商品号=sph ; ON Orderitem.商品号 = Goods.商品号 ON Order.订单号 = Orderitem.订单号; ORDER BY Order.订单号 INTO TABLE tablethree6 按题目要求运行表单。第73套一 基本操作打开表单myform1 选择菜单 显示布局工具栏 框选表单中的所有控件，选择布局工具栏的顶边对齐2 设置“确定”按钮的default属性为.t.3 设置表单的caption属性为“表单操作”，name属性为 myform4 设置“确定”按钮的click事件代码为： thisform.height=val(thisform.text1.value)二 简单应用 1新建查询，向查询设计器中依次添加order，orderitem，goods三张表 字段标签中依次选择订单号，客户名，签订日期，商品名，单价，数量 筛选标签设置为： 客户名 = ”lilan” 排序标签选择 订单号 降序，商品名 降序 选择菜单 查询查询去向表tableone 保存查询文件为queryone.qpr 并运行。2 创建视图的过程略 创建完视图后在命令窗口输入： Select * from viewone into table tabletwo三 综合应用新