VF答案完整版.doc

第一套基本操作 “规则”框中写:数量0 and 数量= 3; ORDER BY 作者姓名;INTO TABLE NEW_VIEW4 (1) 首先将BOOKS.DBF中所有书名中含有计算机3个字的图书复制到表BOOKS_BAK中，以下操作均在BOOKS_BAK表中完成； (2) 复制后的图书价格在原价格基础上降价5%； (3) 从图书均价高于25元(含25)的出版社中，查询并显示图书均价最低的出版社名称以及均价，查询结果保存在表new_table4中(字段名为出版单位和均价)。SELECT * FROM BOOKS WHERE 书名 LIKE %计算机% INTO TABLE BOOKS_BAKUPDATE BOOKS_BAK SET 价格=价格*0.95SELECT TOP 1 出版单位,avg(books_bak.价格) as 均价 FROM books_bak;GROUP BY 出版单位 HAVING 均价=25 ORDER BY 2 INTO TABLE new_table4第三套-基本操作为菜单项查找设置快捷键Ctrl+T。答案:打开mymenu菜单,选中“文件”,单击“编辑”按钮,为“查找”子菜单设置快捷方式,单击“选项”下的按钮,在弹出的“提示选项”对话框中把光标定位在“键标签”后面的框中,从键盘上按下ctrl+n,确定,最后保存菜单并生成. 1. 用SQL语句完成下列操作：查询与项目号s1的项目所使用的任意一个零件相同的项目号、项目名、零件号和零件名称（包括项目号s1自身），结果按项目号降序排序，并存放于item_temp.dbf中，同时将你所使用的SQL语句存储于新建的文本文件item.txt中。答案:在命令窗口中输入以下命令并执行SELECT 项目信息.项目号, 项目信息.项目名, 零件信息.零件号,;零件信息.零件名称 FROM 零件信息 INNER JOIN 使用零件;INNER JOIN 项目信息 ON 使用零件.项目号 = 项目信息.项目号 ;ON 零件信息.零件号=使用零件.零件号 WHERE 使用零件.零件号 IN;(select 零件号 from 使用零件 where 项目号=s1);ORDER BY 项目信息.项目号 DESC INTO TABLE item_temp.dbf新建文本文件,将SQL语句复制过去,注意在保存文本文件时要加上扩展名.txt设计一个文件名和表单名均为form_item的表单，所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题设为使用零件情况统计。表单中有一个组合框（combo1）、一个文本框（text1）和两个命令按钮统计（command1）和退出（command2）。 运行表单时，组合框中有三个条目s1、s2、s3（只有三个，不能输入新的，RowSourceType的属性为数组，Style的属性为下拉列表框）可供选择，单击统计命令按钮以后，则文本框显示出该项目所用零件的金额合计（某种零件的金额=单价*数量）。 答案: 做好表单后，首先把组合框控件的数据源类型改为“5数组”，然后将数据源改为相应的数组名，若题目没有要求数组名，可以任取一个如：aa，做好之后，再在表单的load事件（在表到空白处双击）里定义数组：public aa(3)aa(1)=s1aa(2)=s2aa(3)=s3在查询按钮的单击事件（即click事件）里输入以下代码：SELECT SUM(零件信息.单价*使用零件.数量);FROM 零件信息 INNER JOIN 使用零件 ;ON 零件信息.零件号 = 使用零件.零件号;WHERE 使用零件.项目号 = bo1.value into array bb thisform.text1.value=bb第四套-基本操作 4) 修改组合框的InteractiveChange事件代码，使得当用户从组合框选择职员时，能够将该职员所签订单的平均金额自动显示在文本框里。其中，需将命令语句Text1.Valuem2改为ThisForm.Text1.Valuem2。在考生文件夹下创建一个下拉式菜单mymenu.mnx，并生成菜单程序mymenu.mpr。运行该菜单程序时会在当前Visual FoxPro系统菜单的帮助子菜单之前插入一个考试子菜单，如下图所示。 菜单命令统计和返回的功能都通过执行过程完成。 菜单命令统计的功能是以组为单位求订单金额的和。统计结果包含组别、负责人和合计三项内容，其中负责人为该组组长（由employee中的职务一项指定）的姓名，合计为该组所有职员所签订单的金额总和。统计结果应按合计降序排序，并存放在tabletwo表中。 答案： 做如图所示菜单,在”显示”“常规选项”对话框中选：在之前，在下拉框中选“帮助”，在“统计”菜单项的过程中编写如下代码：SELECT Employee.组别, SUM(Orders.金额) as 合计; FROM 订单管理!employee INNER JOIN 订单管理!orders ; ON Employee.职员号 = Orders.职员号; GROUP BY Employee.组别; INTO TABLE aa.dbf SELECT Aa.组别, Employee.姓名 AS 负责人, Aa.合计; FROM 订单管理!employee INNER JOIN aa ; ON Employee.组别 = Aa.组别; WHERE Employee.职务 = 组长; ORDER BY Aa.合计 DESC; INTO TABLE tabletwo.dbf第五套基本操作 1. 用SQL语句完成下列操作：检索田亮所借图书的书名、作者和价格，结果按价格降序存入book_temp表中。答案:SELECT Book.书名, Book.作者, Book.价格; FROM 图书!book INNER JOIN 图书!loans INNER JOIN 图书!borrows ; ON Loans.借书证号 = Borrows.借书证号 ; ON Book.图书登记号 = Loans.图书登记号; WHERE Borrows.姓名 = 田亮 ORDER BY Book.价格 DESC; INTO TABLE book_temp.dbf2. 在考生目录下有一个名为menu_lin的下拉式菜单，请设计顶层表单form_menu，将菜单menu_lin加入到该表单中，使得运行表单时菜单显示在本表单中, 并在表单退出时释放菜单。 答案:新建表单form_menu，表单的ShowWindow属性改为2作为顶层表单。双击表单空白处，分别输入表单Init和Destroy事件。*Init事件中*DO menu_lin.mpr With This*destroy事件中*Release Menu menu_lin 综合应用： 运行表单时，组合框中有三个条目清华、北航、科学(只有三个出版社名称，不能输入新的)可供选择，在组合框中选择出版社名称后,如果单击统计命令按钮，则文本框显示出图书表中该出版社图书的总数。 答案：步骤1：建立表单,在表单中添加一个组合框、一个文本框和两个命令按钮，并修改各控件的属性,将组合框的rowsourcetype属性改为:1-值,rowsource属性改为:清华,北航,科学,再将组合框的style属性改为:2-下拉列表框,然后双击命令按钮，写入命令按钮的Click事件。*统计命令按钮的Click事件*select count(*) from book where 出版社=bo1.value into array aaTHISFORM.TEXT1.VALUE=aa第六套基本操作在考生文件夹下完成如下操作:1. 用SQL INSERT语句插入元组(p7,PN7,1020)到零件信息表（注意不要重复执行插入操作），并将相应的SQL语句存储在文件one.prg中。INSERT INTO 零件信息 VALUES(p7,PN7,1020)2. 用SQL DELETE语句从零件信息表中删除单价小于600的所有记录，并将相应的SQL语句存储在文件two.prg中。 DELETE FROM 零件信息 WHERE 单价=,实例为:2001-05-01。综合应用 在考生文件夹下创建一个顶层表单myform.scx（表单的标题为考试），然后创建并在表单中添加菜单（菜单的名称为mymenu.mnx，菜单程序的名称为mymenu.mpr）。效果如下图所示。 菜单命令统计和退出的访问键分别为T和R，功能都通过执行过程完成。 菜单命令统计的功能是以客户为单位、从customer和orders表中求出订单金额的和。统计结果包含客户号、客户名和合计三项内容，其中合计是指与某客户所签所有订单金额的和。统计结果应按合计降序排序，并存放答案：步骤1:新建表单,将表单的ShowWindow属性设置为2-作为顶层表单,然后设置其Caption属性值为考试,双击表单空白处，编写表单的Init事件代码： DO mymenu.mpr WITH THIS步骤2：统计( 命令按钮Click事件下的语句，使得当单击该命令按钮时，将左边列表框所选项添加到右边的列表框；答案: thisform.list2.addItem(thisform.list1.value)2. 修改= ctod(thisform.text1.value); ORDER BY 房价.价格 DESC; INTO TABLE tabd.dbf第15套基本操作 (2)打开表单two，在表单菜单中选择新建方法程序命令，新建一个名为test的方法，在属性窗口中双击此方法，在弹出的窗口中编写用户自定义过程代码： ThisForm.Command1.Enabled=.f. (4)在命令窗口输入命令： alter table 教师表 alter 职工号 set check LEFT(职工号,3)=110 简单应用：1. 打开数据库文件课程管理，使用SQL语句建立一个视图salary，该视图包括了系号和（该系的）平均工资两个字段，并且按平均工资降序排列。请将该SQL语句存储在four.prg文件中，否则不得分。CREATE sql VIEW salary AS SELECT 教师表.系号, AVG(教师表.工资) AS 平均工资 FROM 教师表; GROUP BY 教师表.系号 ORDER BY 2 DESC2. 打开考生文件夹下的表单six（如图所示）,登录命令按钮Click事件中的程序功能是：当用户输入用户名和口令以后，单击登录按钮时，程序根据自由表用户表的内容进行操作，若在用户表中找不到相应的用户名，则提示用户名错误，若用户名输入正确，而口令输入错误，则提示口令错误。在登录命令按钮Click事件中空行处填加适当的语句，使其能够正确运行。注意：不得做其他修改。 (2)【操作步骤】步骤1：打开考生文件夹下的表单six.scx，登录按钮中的代码如下。*登录按钮的Click事件代码*步骤2：修改程序中的错误如下。错误1：将WHILE改为DO WHILE。错误2：将NEXT改为SKIP。错误3：将CASE改为IF。步骤3：保存并运行表单。综合应用： 2. 为生成表命令按钮编写程序。程序的功能是根据表单运行时复选框指定的字段和单选钮指定的排序方式生成新的自由表。如果两个复选框都被选中，生成的自由表命名为two.dbf，two.dbf的字段包括职工号、姓名、系名、工资和课程号；如果只有系名复选框被选中，生成的自由表命名为one_x.dbf，one_x.dbf的字段包括职工号、姓名、系名和课程号；如果只有工资复选框被选中，生成的自由表命名为one_xx.dbf，one_xx.dbf的字段包括职工号、姓名、工资和课程号。 3. 运行表单，并分别执行如下操作： (1)选中两个复选框和按职工号升序单选钮，单击生成表命令按钮； (2)只选中系名复选框和按职工号降序单选钮，单击生成表命令按钮； (3)只选中工资复选框和按职工号降序单选钮，单击生成表命令按钮。答案：【操作步骤】*生成表按钮的Click事件代码*a=ThisForm.Check1.Value b=ThisForm.Check2.Value c=ThisForm.Optiongroup1.Option1.Value d=ThisForm.Optiongroup1.Option2.Value if a=1 and b=1 if c=1 select 职工号,姓名,系名,工资,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号; into table two.dbf else if d=1 select 职工号,姓名,系名,工资,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号 desc; into table two.dbf endif endif endif if a=1 and b=0 if c=1 select 职工号,姓名,系名,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号; into table one_x.dbf else if d=1 select 职工号,姓名,系名,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号 desc; into table one_x.dbf endif endif endif if a=0 and b=1 if c=1 select 职工号,姓名,工资,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号; into table one_xx.dbf else if d=1 select 职工号,姓名,工资,课程号 from 教师表,学院表; where 教师表.系号=学院表.系号; order by 职工号 desc; into table one_xx.dbf endif endif endif步骤4：保存表单名为myform，按题目要求运行表单并执行相关操作。第16套基本操作3. 使用SQL语句创建一个名为“分组情况表”的自由表，“分组情况表”有两个字段:组号和组名，组号占两个字符，组名占10个字符。请将该SQL语句存储在three.prg中，否则不得分。Create table 分组情况表(组号 c(2),组名 c(10) 4. 使用SQL语句插入一个记录到“分组情况表”中，插入的内容是，组号：“01”，组名：“通俗唱法”。请将该SQL语句存储在four.prg中，否则不得分。INSERT INTO 分组情况表 VALUES(01,通俗唱法)简单应用第1处：将WHILE改为DO WHILE；第2处：将歌手表.歌手编号改为：LEFT（歌手表.歌手编号，2）；第3处：将INTO改为：WITH。 2. 列表框(List1)中应显示组号，通过RowSource和RowSourceType属性手工指定列表框的显示条目为01、02、03、04(注意不要使用命令指定这两个属性，否则将不能得分)。 3. 为“计算”命令按钮编写程序。程序的功能是：表单运行时，根据列表框中选定的“组号”，将“评分表”中该组歌手(“歌手编号”字段的左边两位表示了该歌手所在的组号)的所有记录存入自由表two.dbf中，two.dbf的表结构与“评分表”相同，表中的记录先按歌手编号降序、再按分数升序排列。4. 运行表单，在列表框中指定组号“01”，并且单击“计算”命令按钮。注意：结果two表文件中只能且必须包含01组歌手的评分信息。步骤2：通过属性窗口设置表单及相关各控件的属性，设置列表框控件的数据源和数据源类型，rowsourcetype为“1-值”，接着在rowsource属性框中输入四个值，注意不加定界符，值与值之间用逗号隔开01,02,03,04然后敲回车确定。 步骤3：双击计算命令按钮编写其Click事件代码为：SELECT * FROM 评分表;WHERE LEFT(评分表.歌手编号,2) = thisform.list1.value;ORDER BY 评分表.歌手编号 DESC, 评分表.分数 INTO TABLE two.dbf步骤4：最后以myform为文件名将表单保存在考生文件夹下，并运行该表单。第十八套简单操作3. 用SQL命令向SCORE1表插入一条记录：学号为993503433、课程号为0001、 成绩是99。 Insert into score1 values(993503433,0001,99)简单应用 2. 建立表单MYFORM3，在表单上添加表格控件(名称为grdCourse), 并通过该控件显示表course的内容(要求RecordSourceType属性必须为0)。答案：步骤2：在属性窗口中修改表格控件的RecordSourceType属性值为:0-表步骤3：在属性窗口中修改表格控件的RecordSource属性为:course综合应用 利用菜单设计器建立一个菜单TJ_MENU3，要求如下: (1) 主菜单(条形菜单)的菜单项包括统计和退出两项； (2) 统计菜单下只有一个菜单项平均,该菜单项的功能是统计各门课程的平均成绩，统计结果包含课程名和平均成绩两个字段,并将统计结果按课程名升序保存在表NEW_TABLE32中。 (3) 退出菜单项的功能是返回Visual FoxPro系统菜单（在命令框写相应命令）。 菜单建立后，运行该菜单中各个菜单项。答案：步骤1：通过菜单设计器新建一个菜单，输入菜单项统计和退出。步骤2：为统计菜单项建立子菜单，并输入菜单项平均。步骤3：在平均菜单的结果中选择过程，单击编辑按钮，在弹出的程序编辑窗口中输入下列代码： *平均菜单项中的过程代码*SELECT Course.课程名, AVG(Score1.成绩) as平均成绩;FROM course,score1 ;WHERE Course.课程号 = Score1.课程号;GROUP BY Course.课程名;ORDER BY Course.课程名;INTO TABLE NEW_TABLE32步骤4：在退出菜单的结果中选择命令，输入：SET SYSMENU TO DEFAULT步骤5：保存菜单名为TJ_MENU3，生成菜单的可执行程序,”菜单”“生成”步骤6：运行菜单并执行菜单中的各菜单项，“程序”“运行”第19套基本操作 1. 打开表单one，向其中添加一个组合框(Combo1)，并将其设置为下拉列表框。2. 在表单one中，通过RowSource和RowSourceType属性手工指定组合框Combo1的显示条目为“上海”、“北京”(不要使用命令指定这两个属性)。 3. 向表单one中添加两个命令按钮Command1和Command2，其标题分别为“统计”和“退出”。为“退出”命令按钮的Click事件写一条命令，执行该命令时关闭和释放表单。 4. 为表单one中的“统计”命令按钮的Click事件写一条SQL命令，执行该命令时，将“歌手表”中所有“歌手出生地”与组合框（Combo1）指定的内容相同的歌手的全部信息存入自由表birthplace中。答案： (1)打开表单one，通过表单控件工具栏向表单添加一个组合框，并修改其Style属性为2下拉列表框。(2)修改组合框的RowSourceType属性值设置为：1值，RowSource设置为：上海，北京。(3)通过表单控件工具栏向表单中添加两个命令按钮，分别在属性工具栏中修改两个按钮的Caption属性为统计和退出，双击退出按钮编写其Click事件代码为： ThisForm.Release。(4)编写统计按钮的Click事件代码为：select * from 歌手表.dbf where 歌手出生地=ThisFbo1.value;INTO TABLE birthplace保存并运行表单。简单应用： 1. 建立一个查询score_query。查询评委为“歌手编号”是“01002”的歌手所打的分数，结果存入自由表result中，该自由表的字段项包括：“评委姓名”和“分数”，各记录按分数升序排列。最后运行该查询。答案; (1)【操作步骤】步骤1：新建一个查询，将评分表和评委表添加到查询设计器中。步骤2：按要求添加字段评委姓名和分数到选定字段中。步骤3：在筛选选项卡中的字段列中选择歌手编号，条件列中选择=，结果列中输入01002。步骤4：在排序依据选项卡中选择分数字段，升序排列。步骤5：设置查询去向为表result。步骤6：保存查询名为score_query，并运行查询。 2. 根据上一步操作得到的自由表result建立一个报表。要求：(1) 使用报表向导建立报表，报表中包括“评委姓名”和“分数”两个字段，按“分数”字段降序排列，报表标题设置为空，报表文件命名为score_result。(2) 打开报表score_result，利用报表控件标签，将“王岩盐得分情况”添加到报表中作为报表的标题。 (2)【操作步骤】步骤1：通过报表向导新建一个报表。步骤2：添加表RESULT，然后添加全部字段到可用字段中，按分数降序排序。步骤3：完成报表，报表标题设置为空，报表名为score_result。步骤4：打开报表，选择主菜单报表下的标题/总结(T)命令，弹出标题/总结对话框，在报表标题中选中标题带区复选框，单击确定按钮，这样就在报表中加入了一个标题带区，打开报表控件工具栏，在打开的报表控件中选择标签控件，在标题带区单击鼠标，输入王岩盐得分情况。步骤5：保存并预览报表，查看报表的设计结果。综合应用 1. 编写程序并执行，计算“01”组(歌手编号的前2位)歌手的得分并将结果存入自由表FINAL.DBF中。FINAL.DBF包含“歌手姓名”和“得分”两个字段，“得分”取各评委所打分数的平均值。FINAL.DBF中的结果按得分降序、歌手姓名降序排列。请将程序存储在two.prg中，否则不得分。 2. 新建一个文件名和表单名均为score_form的表单，向表单添加一个命令按钮Command1，标题为“计算”，为该命令按钮的Click事件增加命令，调用two.prg程序执行。最后运行该表单，并单击“计算”按钮执行two程序。 3. 新建一个项目文件score_project，将自由表“歌手表”、“评委表”和“评分表”以及表单文件score_form加入该项目，然后将项目文件连编成应用程序文件score_app。答案：步骤1：新建一个程序文件，写入如下代码并保存程序名为two，并运行该程序。*two.prg中的代码*SELECT 歌手表.歌手姓名, avg(评分表.分数) as 得分; FROM 歌手表,评分表; WHERE 歌手表.歌手编号 = 评分表.歌手编号; AND left(歌手表.歌手编号,2) = 01; GROUP BY 歌手表.歌手姓名; ORDER BY 2 DESC, 歌手表.歌手姓名 DESC; INTO TABLE final步骤2：新建表单，将其Name属性设置为score_form，通过表单控件工具栏向表单中添加一个命令按钮，修改其Caption属性为计算，编写其Click事件代码为：DO two.prg。步骤3：保存表单名为score_form，并运行该表单。步骤4：单击新建项目，以score_project为文件名进行保存，在项目管理器的数据选项卡中选择自由表，单击添加，在打开的对话框中选择要添加的自由表歌手表、评委表和评分表，在文档选项卡中选择表单，单击添加，在打开的对话框中选择要添加的表单文件score_form。单击”连编”按钮，在连编选项中选择连编应用程序，以文件名score_app保存应用程序。第21套基本操作 1. 修改菜单my_menu，my_menu中的文件菜单项下有子菜单项新建打开、关闭和退出，请在关闭和退出之间加一条水平的分组线，并为退出菜单项设置一条返回到系统菜单的命令(不可以使用过程)。2. 创建一个快速报表sport_report，报表中包含了表金牌榜中的国家代码和金牌数两个字段。3. 使用SQL建立表的语句建立一个与自由表金牌榜结构完全一样的自由表golden.dbf。请将该SQL语句存储在文件one.prg中，否则不得分。4. 使用SQL语句向自由表golden.dbf中添加