2001年（春）Visual FoxPro 上机(06)

2001年（春）江苏省普通高校非计算机专业学生

计算机基础知识和应用能力等级考试上机试卷

二级 Visual FoxPro 5.0 (VFP06)

(本试卷上机考试时间为70分钟)

说明：1.考试语言环境一律为Visual FoxPro 5.0

2.运行考试软盘A中的“准考证”应用程序文件，输入考生的准考证号、试卷代号。

3.启动VFP5.0系统后，首先在命令窗口中执行命令：

set default to A:

以设置默认的工作目录，然后再开始作题。

一、项目、数据库和表操作

打开软盘根目录中的项目文件TESTK，在该项目中已有一数据库SJK,根据下列要求在项目中完成有关数据库及表的操作。

1.修改项目中自由表JSB的结构，并完成规定的操作：

（1）增加一个字符型字段，字段名为LEADER，长度为8；

（2）将XM字段的值为“刘海军”的记录物理删除；

（3）将所有的ZC字段的值为“教授”或“副教授”的记录的JBGZ都增加20元；

2. 设置SJK中XS表字段属性及表属性，要求如下：

(1) 将ZP字段的标题设置为“照片”；

(2) 将ZP字段的字段注释（说明）设置为“存放学生的照片”；

(3) 设置XS表的更新触发器，要求：除了信息管理系学生以外，其它所有的记录都不能再进行修改。

3. 根据下列表格中列出的要求对SJK中的JS表建立结构复合索引：

索引名	类型	表达式
ZCGZ	普通索引	由ZC和JBGZ两个字段组成

4. 已知XS表（学生）已按XH字段建立主索引，索引名为XSXH，CJ表已按XH字段建立普通索引，索引名为CJXH，试按XH建立XS表与CJ表的永久性关系。

5. 把自由表KCB添加到TESTK项目中。

二. 设置查询（10分）

1. 在SJK的XS表（学生）中含有jg（籍贯）字段。在TESTK项目中已存在查询chaxuna，按如下要求设计该查询：

于XS表（学生）查询所有籍贯地。要求输出字段为：jg，查询结果中不允许出现相同籍贯，查询结果按籍贯的升序排序，查询去向为软盘根目录中的表文件jg.dbf。

2. 已知SJK数据库中包含xs表（学生）和cj表（成绩）存在一对多关系。在TESTK项目中已存在查询chaxunb，按如下要求设计该查询：

基于xs表和cj表按ximing(系名)和kcdh(课程代号)字段查询各系科各课程不及格学生人数（注：60分以下为不及格）。要求输出字段为：ximing，kcdh，人数。查询结果按ximing和kcdh升序排列。

三. 设计菜单

在TESTK项目中，利用“快捷菜单设计器”创建一个快捷菜单 MENUK，使得该菜单在表单的RightClick事件中调用时，运行界面如下图所示：

已知表单的　ＷindowState属性值有三个：０－普通；１－最小化；２－最大化。

按如下具体要求设计该菜单：

（1）设置“最小化”菜单项的命令为：_Screen.ActiveForm.WindowState=1；

（2）仿照“最小化”菜单项的命令设置“最大化”菜单项的命令；

（3）在“关闭”菜单项的命令中调用表单的Release方法实现关闭表单的功能；

（4）在“关闭”菜单项和“背景色”菜单项之间插入分组线；

（5）按图中所示创建“背景色”菜单项的子菜单；

（6）为“其他颜色……”菜单项设置命令，实现该菜单名称所指定的功能：即打开颜色对话框，供选择其他颜色来改变表单的背景色。已知颜色对话框的函数为getcolor()。

四. 设计表单

根据下列要求修改项目中的表单文件formk:

1. 表单运行时，表单的关闭按纽不可用（灰色）；

2. 在数据环境中为XS表设置主控索引，索引标识为XSXH；

3. 在数据环境中基于kcdh字段为CJ表和KC表建立临时关系，其中CJ表为主表；

4. 为表格GRID1的第二列（课程名称）设置ControlSource属性，要求这一列中显示与课程代号相对应的课程名称；

5. 将表格中第三列（成绩）的前景色设置为：0，0，255；

6. 为表单增加一个新方法Addnew，要求当调用该方法时，在CJ（成绩表）表中为该学生增加一条记录，要求新增记录的学号等于当前组合框中显示的学生的学号；

7. 增加一个命令按纽，它的标题为“新增”，当按下按纽时，调用表单的新方法Addnew；完成上述修改后运行表单，显示如下图所示。