2013年3月计算机等级考试二级VF上机试题(网友版)

　　【网友版4：】

　　设计一个名为mysupply的表单，表单的控件名和文件名均为mysupply。表单的形式如下图所示。

　　表单标题为"零件供应情况"，表格控件为Grid1，命令按钮"查询"为Command1、"退出"为Command2，标签控件 Label1 和文本框控件Text1(程序运行时用于输入工程号)。

　　运行表单时，在文本框中输入工程号，单击"查询"命令按钮后，表格控件中显示相应工程所使用的零件的零件名、颜色和重量(通过设置有关"数据"属性实现)，并将结果按"零件名"升序排序存储到pp.dbf文件。

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

　　完成表单设计后运行表单，并查询工程号为"J4"的相应信息。

　　【操作步骤】

　　1.在考生文件夹下建立数据库BOOKAUTH.DBC，把表BOOKS和AUTHORS添加到该数据库中。

　　2.为AUTHORS表建立主索引，索引名为"PK"，索引表达式为"作者编号"。

　　3.为BOOKS表建立两个普通索引，第一个索引名为"PK"，索引表达式为"图书编号";第二个索引名和索引表达式均为"作者编号"。

　　4.建立AUTHORS表和BOOKS表之间的永久联系。

　　【操作步骤】

　　(1)步骤1：单击工具栏中的"新建"按钮，在"新建"对话框中选择"文件类型"中的"数据库"，单击"新建文件"。在"创建"对话框中输入数据库名Bookauth，再单击"保存"按钮。

　　步骤2：在数据库设计器上空白处右击，在弹出的快捷菜单中选择"添加表"命令，然后在"打开"对话框中选择考试文件夹下的authors和books表，然后双击打开。

　　(2)在数据库设计器中右击表authors，在弹出的快捷菜单中选择"修改"命令;在表设计器中，选择"索引"选项卡，在"索引名"中输入pk，在"类型"中选择"主索引"，在"表达式"中输入"作者编号"，单击"确定"按钮。

　　(3)在数据库设计器中右击表books，在弹出的快捷菜单中选择"修改"命令;在表设计器中，选择"索引"选项卡，在"索引名"中分别输入pk和"作者编号"，在"类型"中选择"普通索引"，在"表达式"中分别输入"图书编号"和"作者编号"，单击"确定"按钮。

　　(4)在数据库设计器中，在表authors中选中主索引pk，按住鼠标拖动至表books的普通索引"作者编号"上，然后释放鼠标。

　　在考生文件夹下完成如下简单应用：

　　1.打开表单MYFORM4-4，把表单(名称为Form1)标题改为"欢迎您"，将文本"欢迎您访问系统"(名称为Label1的标签)改为25号黑体。最后在表单上添加"关闭"(名称为Command1)命令按钮，单击此按钮关闭表单。

　　保存并运行表单。

　　2.设计一个表单MYFORM4，表单中有两个命令按钮"查询"和"退出"(名称为Command1和Command2)。

　　(1)单击"查询"命令按钮，查询BOOKAUTH数据库中出版过3本以上(含3本)图书的作者信息，查询信息包括作者姓名和所在城市;查询结果按作者姓名升序保存在表NEW_VIEW4中。

　　(2)单击"退出"命令按扭关闭表单。

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

　　(1)【操作步骤】

　　步骤1：单击工具栏中的"打开"按钮，在"打开"对话框中选择考生文件夹的下myform4_4.scx表单，单击"确定"按钮。

　　步骤2：在"属性"对话框中，设置表单的Caption属性为"欢迎您"。

　　步骤3：选中标签控件，在"属性"对话框中设置其FontSize属性为25，FontName属性为"黑体"。

　　步骤4：在表单上添加一命令按钮，设置其Caption属性为"关闭"，双击该按钮，输入thisform.release，再单击工具栏中的"保存"按钮。

　　(2)【操作步骤】

　　步骤1：单击工具栏中的"新建"按钮，在"新建"对话框的"文件类型"选项组中选择"表单"，单击"新建文件"按钮。

　　步骤2：系统打开表单设计器，单击"表单控件"工具栏中的命令按钮，在表单设计器中拖动鼠标添加一个命令按钮对象command1，设置其Caption属性为"查询"，双击command1，在打开的代码编辑器窗口中输入以下代码：

　　SELECT 作者姓名,所在城市;

　　FROM AUTHORS;

　　WHERE 作者编号 IN;

　　(SELECT 作者编号 FROM BOOKS GROUP BY 作者编号 HAVING COUNT(*)>=3);

　　ORDER BY 作者姓名;

　　INTO TABLE NEW_VIEW4

　　用同样的方法，在表单上添加命令按钮command2，设置其Caption属性为"退出"，并双击输入Click的事件代码为：THISFORM.RELEASE

　　步骤3：单击工具栏中的"保存"按钮，在另存为对话框中将表单保存为myform4,再单击"保存"按钮。

　　步骤4：单击工具栏中的"运行"按钮，运行表单，再分别单击表单中的"查询"和"退出"按钮。

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

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

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

　　【操作步骤】

　　步骤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.出版单位;

　　HAVING 均价>=25;

　　ORDER BY 2;

　　INTO TABLE new_table4.dbf

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