VF计算机二级vf上机操作题库

1 Mysupply

Select零件.零件名as 零件名，零件.颜色as 颜色，零件.重量as 重量;

From 供应,零件;

Where 零件.零件号=供应.零件号 and 供应.工程号=thisform.text1.value;

Order By 零件名;

Into dbf pp

2 (1)在考生文件夹下，将BOOKS表中所有书名中含有"计算机"3个字的图书复制到BOOKS_BAK表中，以下操作均在BOOKS_BAK表中完成；

(2)复制后的图书价格在原价格的基础上降低5%；

(3)从图书均价高于25元(含25)的出版社中，查询并显示图书均价最低的出版社名称及均价，查询结果保存在new_table4表中(字段名为出版单位和均价)。

ThisForm.Grid1.RecordSource="pp"

步骤1：在命令窗口中输入下列代码，用于将BOOKS表中满足条件的记录复制到BOOKS_BAK表中，并按回车键以执行该代码。

***************************************

SELECT * FROM BOOKS WHERE 书名LIKE "%计算机%" INTO TABLE BOOKS_BAK ***************************************

步骤2：在命令窗口中输入下列代码，用于更新BOOKS_BAK表中的价格字段，并按回车键以执行该代码。

*************************

UPDATE BOOKS_BAK SET 价格=价格*(1-0.05)

*************************

步骤3：在命令窗口中输入下列代码，并按回车键以执行该代码。

********************************

SELECT TOP 1 Books_bak.出版单位,avg(books_bak.价格) as 均价;

FROM books_bak;

GROUP BY Books_bak.出版单位;

HA VING 均价>=25;

ORDER BY 2;

INTO TABLE new_table4.dbf

3 设计一个表单名和文件名均为form_item的表单，其中，所有控件的属性必须在表单设计器的属性窗口中设置。表单的标题设为"使用零件情况统计"。表单中有一个组合框(Combo1)、一个文本框(Text1)和两个命令按钮"统计"(Command1)和"退出"(Command2)。

运行表单时，组合框中有3个条目"s1"、"s2"和"s3"(只有3个，不能输入新的，RowSourceType 的属性为"数组"，Style的属性为"下拉列表框")可供选择，单击"统计"命令按钮后，则文本框显示出该项目所使用零件的金额合计(某种零件的金额＝单价*数量)。

单击"退出"按钮关闭表单。

注意：完成表单设计后要运行表单的所有功能。

x=allt(bo1.value)

SELECT SUM(使用零件.数量*零件信息.单价) as je;

FROM 使用零件,零件信息 ;

WHERE 使用零件.零件号 = 零件信息.零件号;

AND 使用零件.项目号 = x;

GROUP BY 使用零件.项目号;

into array b

thisform.text1.value=b

************************************

"退出"按钮的Click事件代码为：

******"退出"按钮的Click事件代码******

ThisForm.Release

4

在考生文件夹下创建一个名为mymenu.mnx的下拉式菜单，并生成菜单程序mymenu.mpr。运行该菜单程序时会在当前Visual FoxPro系统菜单的"帮助"子菜单之前插入一个"考试"子菜单，如下图所示。

"统计"和"返回"菜单命令的功能都通过执行"过程"完成。

"统计"菜单命令的功能是以组为单位求"订单金额"的和。统计结果包含"组别"、"负责人"和"合计"3项内容，其中"负责人"为该组组长(取自employee中的"职务"字段)的姓名，"合计"为该组所有职员所签订单的金额总和。统计结果按"合计"降序排序，并存放在tabletwo表中。

"返回"菜单命令的功能是返回Visual FoxPro的系统菜单。

菜单程序生成后，运行菜单程序并依次执行"统计"和"返回"菜单命令。

SELECT Employee.组别, Employee.姓名 AS 负责人,sum(orders.金额) as 合计;

FROM 订单管理!employee INNER JOIN 订单管理!orders ;

ON Employee.职员号 = Orders.职员号;

WHERE Employee.职务 = "组长";

GROUP BY Employee.组别;

ORDER BY 3 DESC;

INTO TABLE tabletwo.dbf

**********************************

步骤4：为"返回"菜单编写代码"SET SYSMENU TO DEFAULT"，方法同步骤3。

步骤5：保存菜单并生成可执行文件。

步骤6：在命令窗口中输入"DO mymenu.mpr"运行程序，并分别执行"统计"和"返回"菜单命令。

5设计一个名为form_book的表单，表单的控件名为form1，文件名为form_book，表单的标题为"图书情况统计"。表单中有一个组合框(名称为Combo1)、一个文本框(名称为Text1)和两个命令按钮"统计"和"退出"(名称为Command1和Command2)。

运行表单时，组合框中有3个条目"清华"、"北航"、"科学"(只有3个出版社名称，不能输入新的)可供选择，在组合框中选择出版社名称后，如果单击"统计"命令按钮，则文本框显示出"book"表中该出版社图书的总数。

单击"退出"按钮关闭表单。

注意：完成表单设计后要运行表单的所有功能。

SELECT COUNT(*) FROM BOOK;

WHERE 出版社=BO1.VALUE;

INTO ARRAY TEMP

THISFORM.TEXT1.VALUE=TEMP(1)

*************************************

*******"退出"命令按钮的Click事件******

ThisForm.Release

7在考生文件夹下创建一个顶层表单myform.scx，表单的标题为"考试"，然后创建并在表单中添加一个菜单，菜单的名称为mymenu.mnx，菜单程序的名称为mymenu.mpr，如下图所示。