计算机等级考试：二级VFP机试第30套

第三十集

一、基本操作题(共4小题，1、2题7分，3、4题8分)

在考生文件夹下完成以下操作:

1。建立数据库BOOKAUTH。DBC又加了一桌子书。DBF和作家。DBF到数据库。

2。为AUTHORS表建立一个主索引，索引名为“PK”，索引表达式为“author number”。

3。为BOOKS表建立两个公共索引，其中一个名为“RK”，索引表达式为“书号”；它的索引名和索引表达式是“作者号”。

4。在AUTHORS表和BOOKS表之间建立连接。

本问题主要评估点:

数据库的建立，向数据库中添加自由表，在数据库中建立新表，建立主索引和普通索引，建立索引表的链接。

解决问题的思路:

1。建立数据库的常用方法:

在项目管理器中建立数据库；

通过“新建”对话框创建数据库；

使用命令交互式构建数据库，命令为:CREATE DATABASE [DatabaseName|？]

可以在项目管理器或数据库设计器中向数据库添加自由表。在数据库设计器中，可以从“数据库”菜单或右击数据库设计器弹出的菜单中选择“添加表”，然后在“打开”对话框中选择要添加到当前数据库中的自由表。还可以使用“添加表”命令向当前数据库添加一个空闲表。

2。打开数据库设计器，在“数据库”菜单或数据库设计器上右键单击要索引的表，在弹出菜单中选择“修改”。

3。在表设计器中的索引页上建立索引。

4。建立两表之间的连接:选中父表中的主索引，按住鼠标拖动到子表中对应的常用索引上，然后松开鼠标，连接建立。

二。简单应用(2道小题，每题20分，40分)

在考生文件夹下完成下面的简单申请:

1。打开表单MYFORM44，将表单的标题(名为Form1)更改为“Welcome ”,并更改文本

将“欢迎使用系统”(标签名为label1)的字号改为25，字体改为隶书。再标

向窗体添加一个“关闭”(名为Command1)命令按钮，单击此按钮关闭窗体。

最后，保存并运行表单。

2。设计一个带有两个命令按钮“Query”(名为Command1)的表单MYFORM4

和“退出”(名为Command2)。

(1)点击“查询”按钮，查询BOOKAUTH数据库中出版的三本以上(含三本)的图书。

关于该书作者的信息。查询信息包括:作者姓名和城市；查询结果按作者姓名上升。

序列保存在表格NEWVIEW中。

(2)单击“退出”按钮关闭表单。

最后，保存并运行表单。

此问题的主要评估点；

数据环境的添加、控件属性的修改、如何用SQL语句更新记录、表单的退出等知识点。

解决问题的思路:

第一个问题:

第一步:打开考生文件夹下的myform44.scx表单。

第二步:将表单的CAPTION属性改为“Welcome”，选择LABEL1标签，在属性列中将FONTSIZE改为25，FONTNAME改为“Lishu”。

第三步:在表单上绘制一个命令按钮，双击按钮，进入此表单。释放，然后点按工具栏中的“存储”按钮。

第二个问题:

第一步:在Visual FoxPro主窗口中按Ctrl+N，弹出“新建”对话框。在文件类型中选择“表单”，点击“新建文件”按钮。

第二步:系统打开表单设计器；单击工具栏按钮“表单控件工具栏”，在弹出的“表单控件”中，选择“命令按钮”，在表单设计器中拖动鼠标，这样就可以在表单上得到一个“命令按钮”对象command1，将其caption属性设置为“查询”，双击command1，在打开的代码编辑器窗口中输入如下代码:

选择作者。作者姓名，作者所在城市；

来自作者、书籍；

作者。作者号=书籍。作者编号；

按作者分组。作者姓名有计数(书籍。书号)> = 3；

按作者排序。作者姓名；

到表格NEWVIEW

同样的方法，在表单上放置command2对象，其Click事件代码为:THISFROM。释放；排放；发布

第三步:保存表单，文件名为myform4.scx，保存在考生文件夹中。

三。综合应用(1题，30分)

在考生文件夹下完成以下综合申请:

(1)首先，把书里的书都抄一遍。DBF用“计算机”这个词来称呼BOOKSBAK表，并且下面的操作都是在BOOKSBAK表中完成的；

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

(3)从平均书价高于25元(含25)的出版社中，查询显示平均书价最低的出版社。

出版社名称和平均价格，查询结果保存在newtable中(字段名为出版公司和平均价格)。

本问题主要评估点:

程序的建立方法、程序中循环结构的使用、SQL查询语句的使用、记录的修改方法等知识点。

解决这个问题的思路:

第一步:打开数据库bookauth.dbc可以使用命令OPEN DATABASE BOOKAUTH。

第二步:将书名中带有计算机三个字的书全部复制到table BOOKSBAK中。

SELECT * FROM books WHERE AT(" computer "，书名)> 0 INTO TABLE BOOKSBAK

第三步:在原价基础上降价5%。

更新书库设置价格=价格*0.95

第四步:找出每本书的均价，放入临时表中。

选择出版单位，AVG(价格)作为平均价格从图书bak到光标1组按出版单位排序按平均价格

第五步:查询临时表中均价高于25的图书中价格最低的出版社名称和均价。

SELECT * 1 FROM cursor 1 WHERE average price > = 25 into table new table ORDER BY average price