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

第27集

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

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

1。创建一个名为“Supply”的新项目文件。

2。将数据库“提供的零件”添加到新创建的“提供的”项目文件中。

3。通过“零件号”字段在“零件”表和“供应”表之间建立永久连接(“零件”是父表，“供应”是子表)。

4。为“供应”表中的数量字段设置有效性规则:数量必须大于0且小于9999；错误信息是“数量超出范围”。(注意:公式必须是数量> 0 .和.数量
才能考知识点:

项目档案的建立和添加。数据库永久关系的建立，有效性规则的建立。

解决问题的思路:

1。在“文件”菜单中选择“新建”，在类型选择框中选择“项目”，点击新建文件按钮，输入项目名称:“供货”。

2。在项目管理器的“数据”节点下选择“数据库”，点击“添加”按钮，选择“供应零件”数据库。

3。首先，应该索引两个表，并且父表必须是主索引或候选索引。具体方法是:在项目管理器中选择“供应零件”数据库，点击“修改”按钮，打开数据库设计器，在数据库设计器中选择“零件”表，在数据库菜单中点击“修改”，在表设计器的索引标签中建立索引。索引名称为“零件号”，索引表达式为“零件号”，索引类型为主索引，因此保存更改。使用相同的方法来索引“supply”表。索引名称为“零件号”，索引表达式为“零件号”，索引类型为“常用索引”。建立永久联系的方法是:在数据库设计器中点击“零件”表中的索引“零件号”，按住鼠标左键拖动到“供应”表中对应的索引上。

4。打开“supply”表的表设计器，首先在列表框中选择“quantity”字段，然后输入:quantity > 0.and. quantity
2。简单应用(2道小题，每题20分，40分)

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

1。使用SQL语句完成以下操作:列出与“红色”零件相关的所有信息(供应商

号，项目号和数量)，搜索结果按数量降序排序并存储在表sup_temp中。

2。设置一个名为m_quick的快捷菜单，它有两个菜单项“查询”和“

“修改”。然后在myform表单中的RightClick事件中调用快捷菜单m_quick。
考查知识点:

SQL查询语句、查询目的地、子查询等。快捷菜单的建立，调用窗体中的快捷菜单。

解决问题的思路:

1。获取“parts”表中所有红色的零件号，然后在“supply”表中获取与该零件号相关的零件信息。

从供应中选择供应商编号、工程编号和数量；

where零件号iN(从part where color = "red "中选择零件号)；

到表sup_temp按数量排序desc

2。首先建立菜单并生成相应的mpr文件，然后在表单中调用。具体方法是:在“文件”菜单中选择“新建”，在“新建”对话框中选择“菜单”，点击“新建文件”按钮，选择“快捷菜单”，在菜单设计器中输入“查询”和“修改”两个菜单项，在“菜单”菜单中点击“生成”，根据提示另存为m_quick。打开表单myform，双击表单设计器打开代码窗口，在对象中选择form1，在过程中选择右键，输入代码:do m_quick.mpr，保存表单。

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

设计一个名为mysupply的表单(表单的控件名和文件名为mysupply)。形式

标题是“零件供应”。该表单有一个表格控件和两个命令按钮“查询”(名为

Command1)和“Exit”(名为Command2)。

运行表单时，单击“查询”命令按钮后，项目编号显示在表单控件(名称grid1)中

在“J4”中使用的零件名称、颜色和重量。

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

考查知识点:

表单的建立，表单控件的使用，SQL查询命令，子查询等。

解决问题的思路:

1。从“文件”菜单中选择“新建”命令，在文件类型选择框中选择“表单”，然后单击“新建文件”按钮。

2。在窗体设计器中，将窗体的Name属性设置为“mysupply ”,将Caption属性设置为“parts supply”。从控件工具栏中选择两个按钮和一个窗体，并将它们放在窗体上。将按钮Command1的Caption属性设置为“query”，将Command2的Caption属性设置为“exit”，将表单的Name属性设置为“grid1”，将RecordSourceType属性设置为。

3。在Command1按钮的Click事件中，输入:

关闭安全

从零件中选择零件名称、颜色和重量。

其中零件号；

(从供应商处选择零件号，其中工程编号= "j4 ")到表ls中

&&将查询结果保存在表中。

this form . grid 1 . record source = " ls "

&&将表的数据源设置为查询结果生成的表。

打开安全

4。在Command2按钮的Click事件中输入:Thisform.release，并将表单保存为mysupply.scx