2008年春上机试卷
2008年(春)计算机二级VFP上机试卷(VFP06)
一、项目、数据库和表操作（12分）
打开T：盘根目录中的项目文件JXGL，在该项目中已有一数据库JXSJ。 1、按下列要求在数据库jxsj中信建一个表名为ab的数据库表。 （1）按下表所示创建ab表的表结构（包括字段的标题属性）：
字段名 xh csrq byzx gkcj 标题 姓名 出生日期 毕业中学 高考成绩 类型 C D C N 长度 10 20 3 小数位数 0 （2）为gkcj设置有效性规则：大于或等于500，且小于或等于750； （3）为csrq字段设置默认值：1985年1月1日； （4）为表创建一个普通索引abcd，要求按高考成绩（gkcj字段）排序，相同时按毕业中学（byzx）排序。 2、为学生（xs）表设置更新触发器：班级编号（bjbh字段）的后四位必须与院系专业代码（yxzydm字段）的前四位相等。
3、将教材（jc）表中出版年份（cbnf字段）在2002年之前（含2002年）的教材全部加注删除标志。
4、已知课程（kc）表和课程安排（kcap）表存在相同的课程代码（kcdm字段），以kc表为主表、kcap表为子表，按kcdm建立永久关系，并设置kc表和kcap表之间的参照完整性：删除限制。 二、设计查询（8分）
已知教师（js）表中含有文化程度代码（whcd，C）、职称（zc，C）、工作日期（gzrq，D）和出生日期（csrq，D）等字段。在数据库中含有文化程度视图（whcd），视图含有文化程度代码（dm）和文化程度名称（mc）字段。按如下要求修改jxgl项目中的查询chaxun：
基于js表和whcd视图统计各类学历的教师最早参加工作年龄和平均参加工作年龄。要求输出字段为：文化程度名称、最早参加工作年龄、平均参加工作年龄，查询结果按文化程度名称排序。（提示：参加工作年龄可以按工作日期与出生日期年份之差求得） 三、设计菜单（5分）
JXGL项目中已存在菜单MENU，其中已定义了“文件”菜单栏及其中的
“退出菜单”项，按如下要求设计菜单，完成后的运行效果如图1所示。 图1 1、创建“课程管理”菜单栏，并创建其子菜单“课程浏览”、“定位行...”。
2、为“课程浏览”菜单项设置命令：SELECT * FROM kc。 3、为“定位行...”菜单项设置“跳过”条件：!used(“kc”)。 四、设计表单（10分）
表单f072h用于用户登录，假定输入的用户名为学生姓名（基于xs表的xm字段），密码假定为学号（xh字段）。按下列要求修改表单，修改后表单运行时如图2所示。 1、修改表单的有关属性，使表单的标题为“登录”，且运行时自动居中、边框样式为“固定对话框”。
2、向表单的数据环境中添加xs表，并将其设置为只读。 3、添加一个图像（Image）控件，并且将其设置为显示pc.ico
图标文件、背景为透明。 图2 4、添加一个命令按钮，并且命令按钮控件上显示文本为“确定”、访问键为“ALT+Y”。 5、为添加的命令按钮设置Click事件代码，其功能是根据输入的用户名和密码在xs表中查找（假定用户名对应姓名、密码为学号），若找到则将VFP主窗口（对象名为_SCREEN）的标题设置为用
2008年春上机试卷
户名（即文本框Text1的值），然后关闭表单，否则显示“用户名或密码不正确！”消息框并返回。要求用下列
代码来实现其功能（该代码需要完善）：
LOCATE FOR xm=ALLT(THISFORM.Text1.Value)… IF !EOF()
_SCREEN.CAPTION=… ELSE
=MESSAGEBOX()… RETURN
ENDIF
THISFORM.… 五、程序改错（5分）
下列程序的功能是：任意输入三个实数，分别作为一元二次方程的二次项、一次项、常数项系数，并且求解方程（注：INPUT命令的功能是从键盘将用户输入的数据送到指定变量）。要求：
①将下列程序输入到项目的程序文件PCODE中，并对其中的2条错误语句进行修改； ②在修改程序时，不允许修改程序的总体框架和算法，不允许增加或减少语句数目。 set talk off
input \输入二次项系数：\input \输入一次项系数：\input \输入常数项系数：\d=b**2-4*a*c x=2*a do case
case d=0
?\两个等根：\ case d>0
?\两个不等根：\ ??(-b-sqrt(d))/x case d<0
?\两个复根：\ sb=str(-b/x,9,4)
xb=str(sqrt(d)/x,9,4) ??sb+\
?\Enddo
2008年春上机试卷
2008年(春)计算机二级VFP上机试卷(VFP07)
一、项目、数据库和表操作（12分）
打开T：盘根目录中的项目文件JXGL，在该项目中已有一数据库JXSJ。 1、按下列要求在数据库jxsj中信建一个表名为ab的数据库表。 （1）按下表所示创建ab表的表结构（包括字段的标题属性）：
字段名 rq wbbz hl bz 标题 日期 外币币种 汇率 备注 类型 D C N M 长度 20 6 小数位数 2 （2）为rq字段设置默认值：当前系统日期；
（3）设置wbbz字段的有效性规则：不能为空（提示：使用EMPTY函数）；
（4）创建一个普通索引abcd，要求按rq字段排序，日期字段相同时按wbbz字段排序。
2、为学生（xs）表设置删除触发器：班级编号（bjbh字段）的后四位与院系专业代码（yxzydm字段）的前四位不一致的可以删除。
3、为教材（jc）表增加一个进价字段（字段名为jj），其结构与单价（dj）字段相同，且为其赋值：
jj等于dj的85%。
4、已知院系专业（yxzy）表和学生（xs）表存在相同的院系专业代码（yxzydm）字段，以yxzy表为主表，xs表为子表、按yxzydm建立永久关系，并设置yxzy表和xs表之间的参照完整性：删除限制。
二、设计查询（8分）
已知教材（jc）表存储了各门课程的教材使用情况，其中含有出版社名称（cbsmc，C）、作者（zz，C）和出版年份（cbnf，C）等字段。按如下要求修改jxgl项目中的查询chaxun：
基于jc表查询2000年以后（含2000年）在同一个出版社出版了2本或2本以上教材的所有作者。要求输出字段为：作者、出版社名称、出版教材数，查询结果按出版教材数降序排序。 三、设计菜单（5分）
JXGL项目中已存在菜单MENU，其中已定义了“文件”菜单栏及其中的“退出菜单”项，按如下要求设计菜单，完成后的运行效果如图1所示。
1、在“文件”菜单栏下创建“记录定位”菜单项，并创建其子菜单“First”、“Previous”、“Next”、“Last”。 图1 2、将菜单项“First”、“Previous”、“Next”、“Last”的单词首字母设置为访问键。
3、为“First”菜单项添加过程代码： GO TOP BROWSE
4、为菜单项“Last”设置命令：GO BOTTOM。 四、设计表单（10分）
表单f072k用于根据所选择的表，将其导出为文本文件或Microsoft Excel文件。按下列要求修改表单，修改后表单运行时如图2所示。
1、修改表单的有关属性，使表单的标题为“导出”，且表单运
行时自动居中。 图2 2、将两个标签控件的显示文本分别设置为“导出类型”、“导出文件名”，将两个选项按钮的显示文本分别设置为“文本文件”和“Excel文件”，将命令按钮Command2的显示文本设置为“导出”。
2008年春上机试卷
3、完善表单的ABCD方法代码，要求在两个空行处分别添加一条命令，其功能分别是将当前工作区中打开的表复制为文本文件和Excel文件，文件名由文本框Text2给定。（注：命令中表 述导出文件的文件名时，用名称表达式“（ALLTRIM（THISFORM.Text2.Value））”。） 4、为命令按钮Command2设置Click事件代码，要求用两条命令分别实现：首先调用表单的ABCD方法，然后关闭表单。 五、程序改错（5分）
下列程序的功能是：程序运行时屏幕上显示如图3所示的菱形。要求：
①将下列程序输入到项目的程序文件PCODE中，并对其中的2条错误语句进行修改； ②在修改程序时，不允许修改程序的总体框架和算法，不允许增加或减少语句数目。 set talk off clear
for i=1 to 9 step 2 ?space(10-i)
c=iif(mod(i,2)=1,\ for j=1 to 2*i-1 ??c endfor endfor
for i=9 to 1 step -1 ?space(10-i)
c=iif(mod(i,2)=1,\ for j=1 to 2*i-1 ??c endfor endif
图3 2008年秋上机试卷
2008年(秋)计算机二级VFP上机试卷(VFP02)
一、项目、数据库和表操作(12分)
打开T：盘根目录中的项目文件JXGL，在该项目中已有一数据库JXSJ。
1、将dmb中lx字段值为“民族”的记录复制到ab表（注：可使用COPY TO…FOR…命令），并添加到jxsj数据库。在此基础上，根据下列要求修改ab表： （1）修改ab表的表结构：删除lx字段；
（2）设置ab表的dm字段的标题属性：民族代码；
（3）设置mc字段格式，使得在该字段中输入数据时自动删除其前导空格；
（4）为ab表创建一个主索引abcd，要求民族代码（字段名为dm）不能重复录入。 2、为教材（jc）表设置编辑说明（即表注释）：教材信息表。 3、为js表增加一个备注字段（字段名为bz，类型为备注型），并为它赋值：如果年龄小于或等于35，则bz字段的值为“青年教师”。（注：年龄为当前系统日期的年份减去出生日期（csrq字段）的年份。）
4、已知民族（ab）表和学生（xs）表存在相同的民族代码字段（但字段名分别为dm和mzdm），以ab表为主表，xs表为子表，以mzdm为表达式为xs表创建普通索引mzdm，按民族代码建立永久关系，并设置ab表和xs表之间的参照完整性：更新限制。
二、设计查询（8分）
已知教师（js）表存储了每名教师的基本信息，其中 性别（xb，C）、文化程度代码（whcd，C）、出生日期（csrq，D）等字段，视图whcd为文化程度代码与名称对照表，含文化程度代码（dm，C）和文化程度名称（mc，C）字段。按如下要求修改jxgl项目中的查询chaxun：
基于js表和whcd视图，根据文化程度和性别分组统计年龄小于或等于45岁的教师人数。要求：输出文化程度名称、性别和人数（字段名分别依次为mc、xb和rs），查询结果按文化程度名称排序，文化程度相同时按性别排序。（注：教师的年龄为当前系统日期的年份减去出生日期的年份）
三、设计菜单（5分）
jxgl项目中已存在菜单menu，已定义了“系统管理”菜单栏及其中的“恢复系统菜单”菜单项。按如下要求设计菜单，完成后的运行效果如图1所示。
图1
1、在“系统管理”菜单栏中插入VFP系统菜单“页面设置”，并为其设置快捷键“CTRL+G”。 2、创建“教师管理”菜单栏，其访问键为J，并创建其子菜单“浏览”、“统计”和“打印”，分组线如图所示。
3、为“统计”菜单项设置提示信息“统计男女教师人数”，并设置SELECT-SQL命令，其功能是统计并显示js表中男女教师的人数，输出字段的哦字段名为xb、rs。 四、设计表单（10分）
表单f081a用于对cj表数据浏览。按下列要求修改表单，修改后表单运行如图2所示。 1、修改表单的有关属性，使表单的标题为“数据浏览”，背景颜色为淡蓝色（RGB参数是（0，255，255）），表单运行时自动居中。 图2 2、首先将cj表添加到数据环境中，然后从数据环境中将cj表拖到表单上以产生一个表格控件，并设置该表格的有关属性，使得表格无删除标记列、不显示水平线。