全国计算机等级考试二级Visual FoxPro上机试卷
课程名和分数），并把这些数据保存到表table3中（若一个学生有多门课程不及格，在表table3中就会有多条记录）。表table3中的各记录应该按分数升序排序，分数相同则按学号降序排序。要求在程序中用SET RELATION命令建立chengji表和xuesheng表之间的关联（同时用INDEX命令建立相关的索引），并通过DO WHILE循环语句实现规定的功能。最后运行程序。 简单应用题答案：
2、crea view view1 as sele xuesheng.学号,姓名,英语 from xuesheng,chengji where xuesheng.学号=chengji.学号 and; 民族<>\汉\英语 desc,xuesheng.学号 sele * from view1 into table table2 综合应用题答案： SET TALK OFF SET SAFE OFF CLOS ALL USE TABLE3 ZAP
SELECT * FROM table3 WHERE .f. INTO TABLE temp SELECT 1
USE xuesheng
INDEX ON 学号 TAG 学号 SELECT 2
USE chengji
INDEX ON 学号 TAG 学号
SET RELATION TO 学号 INTO xuesheng GO TOP
DO WHILE .NOT.EOF() IF chengji.数学<60
INSERT INTO temp values (xuesheng.学号,xuesheng.姓名,'数学',chengji.数学) ENDIF
IF chengji.英语<60
INSERT INTO temp values (xuesheng.学号,xuesheng.姓名,'英语',chengji.英语) ENDIF
IF chengji.信息技术<60
INSERT INTO temp values (xuesheng.学号,xuesheng.姓名,'信息技术',chengji.信息技术) ENDIF SKIP ENDDO
SELECT * FROM temp ORDER BY 分数,学号 DESC INTO ARRAY arr INSERT INTO table3 FROM ARRAY arr CLOSE ALL
DROP TABLE temp SET TALK ON RETURN
第 60 套
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
1. 修改菜单my_menu，my_menu中的\文件\菜单项下有子菜单项\新建\、\打开\、\关闭\和\退出\，请在\关闭\和\退出\之间加一条水平的分组线，并为\退出\菜单项设置一条返回到系统菜单的命令（不可以使用过程）。 2. 使用\调试器\单步调试考生文件夹下的程序debug.prg，调试结束后，将调试输出窗口中的内容保存到文本文件debug_out.txt中。
3. 使用SQL建立表的语句建立一个与自由表\金牌榜\结构完全一样的自由表 golden.dbf。请将该SQL语句存储在文件one.prg中，否则不得分。
4. 使用SQL语句向自由表golden.dbf中添加一条记录(\。请将该SQL语句存储在文件two.prg中，否则不得分。 二、简单应用（2小题，每题20分，计40分） 1. 使用SQL语句完成下面的操作：根据\国家\和\获奖牌情况\两个表统计每个国家获得的金牌数（\名次\为1表示获得一块金牌）结果包括\国家名称\和\金牌数\两个字段，并且先按\金牌数\降序、再按\国家名称\降序排列存储到表temp中。请将该SQL语句存储在文件three.prg中，否则不得分。
2. 建立一个文件名和控件名均为myform的表单，表单构造见下图。表单中包括一个列表框（List1）、一个选项组（Optiongroup1）和一个\退出\命令按钮（Command1），这三个控件名使用系统默认的名字。相关控件属性设置要求：表单的标题为\奖牌查询\，列表框的数据源使用SQL语句根据\国家\表显示国家名称，选项组中有三个按钮，标题分别为金牌（Option1）、银牌（Option2）和铜牌（Option3）。
三、综合应用（1小题，计30分）
打开考生文件夹下的sport_project项目，项目中有一个表单sport_form，表单中包括三个命令按钮。请完成如下操作：
1. 编写并运行程序Four.prg。程序功能是：根据\国家\和\获奖牌情况\两个表统计并建立一个新表\假奖牌榜\，新表包括\国家名称\和\奖牌总数\两个字段，要求先按奖牌总数降序排列（注意\获奖牌情况\的每条记录表示一枚奖牌）、再按\国家名称\升序排列。 2. 为表单sport_form中的\生成表\命令按钮编写一条命令，执行Four.prg程序。
3. 将快速报表sport_report加入项目文件，并为表单sport_form中的命令按钮\浏览报表\编写一条命令，预览快速报表sport_report。
4. 将自由表\国家\和\获奖牌情况\加入项目文件sport_project，然后将项目文件连编成应用程序文件sport_app.app。
第 36 页, 共 56 页
全国计算机等级考试二级Visual FoxPro上机试卷
基本操作题答案：
1、首先在“关闭”与“退出”菜单项间插入一新菜单项，输入“\\-”即可获取水平线, “退出”菜单项的命令代码为:SET SYSMENU TO DEFAULT 3、程序one.prg的内容为：
use 金牌榜
copy stru to golden
4、程序TWO.prg的内容为： insert into golden valu(\简单应用题答案：
1、程序THREE.prg的内容为：
SELECT国家名称,COUNT(名次) AS 金牌数 FROM国家,获奖牌情况 where 国家.国家代码=获奖牌情况.国家代码; and 获奖牌情况.名次=1 GROUP BY 国家.国家名称 ORDER BY 2 DESC,国家.国家名称 DESC INTO TABLE temp 2、将列表LIST1的rowsource属性设置为：“select 国家名称 from 国家”，Rowsourcetype属性设置为：3 综合应用题答案：程序Four.prg的内容为：
SELECT国家名称,COUNT(名次) AS 奖牌总数 FROM 国家,获奖牌情况 WHERE 国家.国家代码=获奖牌情况.国家代码; GROUP BY 国家名称 ORDER BY 2 DESC,国家名称 INTO TABLE 假奖牌榜.dbf 表单sport_form中的\生成表\命令按钮的CLICK事件代码为：DO FOUR.PRG
表单sport_form中的命令按钮\浏览报表\的CLICK事件代码为：REPORT FORM SPORT_REPORT.FRX PREVIEW
第 61 套
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
1. 打开考生文件夹下的表单one（如图所示），在\显示\命令按钮的Click事件中增加一条语句，使表单运行时单击该命令按钮
的结果是在Text1文本框中显示当前系统日期的年份。
2. 打开考生文件夹下的表单two（如图所示），为该表单新建一个方法test，该方法的功能是使\测试\按钮变为不可用。（\测
试\按钮的Click事件中已经有一条语句负责调用test方法）。
3. 创建一个快速报表study_report，报表中包含\课程表\中的所有字段。
4. 使用SQL语句为\教师表\的\职工号\字段增加有效性规则：职工号的最左边三位字符是110，表达式应为：LEFT(职工
号,3)=\。请将该SQL语句存储在three.prg文件中，否则不得分。
二、简单应用（2小题，每题20分，计40分）
1. 打开数据库文件\课程管理\，使用 SQL语句建立一个视图salary，该视图包括了系号和（该系的）平均工资两个字段，并且按平均工资降序排列。请将该SQL语句存储在four.prg文件中，否则不得分。
2. 打开考生文件夹下的表单six（如图所示），\登录\命令按钮Click事件中的程序功能是：当用户输入用户名和口令以后，单击\登录\按钮时，程序根据自由表\用户表\的内容进行操作，若在\用户表\中找不到相应的用户名，则提示\用户名错误\，若用户名输入正确，而口令输入错误，则提示\口令错误\。在\登录\命令按钮Click事件中空行处填加适当的语句，使其能够正确运行。注意：不得做其他修改。
第 37 页, 共 56 页
全国计算机等级考试二级Visual FoxPro上机试卷
三、综合应用（1小题，计30分）
1. 建立一个如图所示的表单名和文件名均为myform的表单。表单的标题是\教师情况\，表单中有两个命令按钮（Command1和Command2），两个复选框（Check1和Check2）和两个单选钮（Option1和Option2）。Command1和Command2的标题分别是\生成表\
和\退出\，Check1和Check2的标题分别是\系名\和\工资\，Option1和Option2的标题分别是\按职工号升序\和\按职工号降序\。 2. 为\生成表\命令按钮编写程序。程序的功能是根据表单运行时复选框指定的字段和单选钮指定的排序方式生成新的自由表。如果两个复选框都被选中，生成的自由表命名为 two.dbf，two.dbf的字段包括职工号、姓名、系名、工资和课程号；如果只有\系名\复选框被选中，生成的自由表命名为one_x.dbf，one_x.dbf的字段包括职工号、姓名、系名和课程号；如果只有\工资\复选框被选中，生成的自由表命名为one_xx.dbf，one_xx.dbf的字段包括职工号、姓名、工资和课程号。
3. 运行表单，并分别执行如下操作：(1)选中两个复选框和\按职工号升序\单选钮，单击\生成表\命令按钮；(2)只选中\系名\复选框和\按职工号降序\单选钮，单击\生成表\命令按钮；(3)只选中\工资\复选框和\按职工号降序\单选钮，单击\生成表\命令按钮。
基本操作题答案：
1、“显示”命令按钮的Click事件代码为：thisform.text1.value=year(date()) 2、test的事件代码为：thisform.command1.enabled=.f.
4、程序three.prg的内容如下：alter table 教师表 alter 职工号 set check LEFT(职工号,3)=\简单应用题答案： 1、程序four.prg的内容如下：由于阅卷系统问题，本题必须严格照抄，包括行数。
create sql view salary as;
select 教师表.系号,AVG(教师表.工资) AS 平均工资; FROM 课程管理!教师表;
GROUP BY 教师表.系号; ORDER BY 2 DESC 2、第一处加：do while not eof(),由于阅卷系统问题，not前后不能带. 第二处加：endif，第三处加：skip，第四处加：if flag=0 综合应用题答案：“生成表”命令按钮的CLICK事件如下： Clos all
a=thisform.check1.value b=thisform.check2.value
c=thisform.optiongroup1.option1.value d=thisform.optiongroup1.option2.value if a=1 and b=1 if c=1
select 职工号,姓名,系名,工资,课程号 from教师表,学院表 where 教师表.系号=学院表.系号;
order by 职工号 into table two else if d=1
select 职工号,姓名,系名,工资,课程号 from教师表,学院表 where 教师表.系号=学院表.系号; order by 职工号 desc into table two endif endif endif
if a=1 and b=0 if c=1
select 职工号,姓名,系名,课程号 from教师表,学院表 where 教师表.系号=学院表.系号;
order by 职工号 into table one_x else if d=1
select 职工号,姓名,系名,课程号 from教师表,学院表 where 教师表.系号=学院表.系号; order by 职工号 desc into table one_x endif endif endif
if a=0 and b=1 if c=1
select 职工号,姓名,工资,课程号 from教师表,学院表 where 教师表.系号=学院表.系号; order by 职工号 into table one_xx else
if d=1
select 职工号,姓名,工资,课程号 from教师表,学院表 where 教师表.系号=学院表.系号; order by 职工号 desc into table one_xx
第 38 页, 共 56 页
全国计算机等级考试二级Visual FoxPro上机试卷
endif endif endif
第 62 套
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分） 在考生文件夹下，打开\宾馆\数据库，完成如下操作：
1. 打开\客户\表，给\性别\字段增加约束：性别只能为\男\或\女\，默认值为：\女\，表达式为： 性别 $ \男女\； 2. 为\入住\表创建一个主索引，主索引的索引名为fkkey，索引表达式为：\客房号+客户号\；
3. 根据各表的名称、字段名的含义和存储的内容建立表之间的永久联系，并根据要求建立相应的普通索引，索引名与建索引的字段名相同，升序排序。
4. 使用SQL的SELECT语句查询\客户\表中性别为\男\的客户号、身份证、姓名和工作单位字段值，并将结果存储到名为TABA的表（注意，该表不需要排序）。请将该语句存储到名为ONE.PRG的文件中。 二、简单应用（2小题，每题20分，计40分）
在考生文件夹下，打开\宾馆\数据库，完成如下简单应用：
1. 使用查询设计器设计一个名称为TWO的查询，查询房价价格大于等于280元的每个客房的客房号、类型号（来自客房表）、类型名和价格。查询结果按类型号升序排序，并将查询结果输出到表TABB中。设计完成后，运行该查询。
2. 修改一个名称为THREE.PRG的命令文件。该命令文件用来查询与\姚小敏\同一天入住宾馆的每个客户的客户号、身份证、姓名、工作单位，查询结果包括\姚小敏\本人。 查询结果输出到表TABC中。该命令文件在第3行、第5行、第7行和第8行有错误（不含注释行），打开该命令文件，直接在错误处修改，不可改变SQL语句的结构和短语的顺序，不允许增加、删除或合并行。修改完成后，运行该命令文件。
三、综合应用（1小题，计30分）
在考生文件夹下，先打开\宾馆\数据库，然后创建一个文件名为test的表单，如图所示。
该表单完成如下综合应用：在该表单中设计一个标签（Label1）、一个文本框（Text1）和两个命令按钮。标签的标题文本为\退房日期大于或等于\。 文本框用于输入退房日期。两个命令按钮的功能如下： ⑴ \查询\按钮（Command1）：在该按钮的Click事件中使用SQL的SELECT命令查询退房日期大于或等于输入日期的客户号、身份证、姓名、工作单位和该客户入住的客房号、类型名、价格信息，查询结果按价格降序排序，并将查询结果存储到表TABD中。表TABD的字段为客户号、身份证、姓名、工作单位、客房号、类型名、价格。 ⑵ \退出\按钮（Command2）的功能是\关闭和释放表单\。表单设计完成后，运行该表单，查询退房日期大于或等于2005-04-01的顾客信息。 基本操作题答案：
3、“入住”按客房号和客房号分别建立普通索引，“客房”按类型号建立普通索引。“客户”和“入住”按客户号建立联系， “客房”和“入住”按客房号建立联系，“房价”和“客房”按类型号建立联系。 4、程序one.prg的内容如下：
SELECT 客户号,身份证,姓名,工作单位 FROM 客户 WHERE 性别=\男\简单应用题答案：
2、第三行后加“on 客户.客户号=入住.客户号”。第五行 select 后加“入住日期”。第三行条件改为“客户.客户号=入住.客户号
AND 姓名 = \姚小敏\”。第八行改为：“INTO TABLE TABC” 综合应用题答案：“查询”命令按钮的CLICK事件代码如下：
SELECT 客户.客户号,身份证,姓名,工作单位,客房.客房号,房价.类型名,价格;
FROM 客户,房价,入住,客房 WHERE 客户.客户号=入住.客户号 AND 客房.客房号=入住.客房号;
AND 房价.类型号=客房.类型号 AND 退房日期>=ctod(thisform.text1.value) ORDER BY 价格 DESC INTO TABLE tabd
第 63 套
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分） 1. 建一个表单，表单文件名和表单控件名均为myform。
2. 将myform表单设置为模式表单，并将其标题设置为\表单操作\。
3. 将考生目录中的xuesheng表和chengji表依次添加到myform表单的数据环境中。确保两个表对应的对象名称分别为cursor1和cursor2。
4. 在数据环境中为xuesheng表和chengji表建立关联关系：当xuesheng表中的记录指针移动时，chengji表中的记录指针会自动移到学号相同的对应记录上。
二、简单应用（2小题，每题20分，计40分）
1. 利用查询设计器创建查询，从xuesheng和chengji表中查询数学、英语和信息技术三门课都在85分以上（含），或者数学、英语都在90分以上（含）而信息技术在75分以上（含）的学生记录。查询结果包含学号、姓名、数学、英语和信息技术5个字段；各记录按学号降序排序；查询去向为表table1。最后将查询保存在query1.qpr文件中，并运行该查询。 2. 首先创建数据库cj_m，并向其中添加xuesheng表和chengji表。然后在数据库中创建视图view1：利用该视图只能查询20001001班（学号的前8位数字串为班号）的学生记录；查询结果包含学号、姓名、数学、英语和信息技术5个字段；各记录按学号降序排序。最后利用刚创建的视图view1查询视图中的全部信息，并将查询结果存放在表table2中。
第 39 页, 共 56 页
全国计算机等级考试二级Visual FoxPro上机试卷
三、综合应用（1小题，计30分）
在考生文件夹下创建一个下拉式菜单 mymenu.mnx，并生成菜单程序mymenu.mpr。运行该菜单程序时会在当前vfp系统菜单的末尾追加一个\考试\子菜单，如下图所示。
菜单命令\计算\和\返回\的功能都通过执行过程完成。 菜单命令\计算\的功能如下： 1）先用SQL-SELECT语句完成查询：按学号降序列出所有学生在学号、姓名、数学、英语和信息技术5个字段上的数据，查询结果存放在表table3中。2）用ALTER TABLE语句在表table3中添加一个\等级\字段，该字段为字符型，宽度为4。 3）最后根据数学、英语和信息技术的成绩为所有学生计算等级：三门课程都及格（大于等于60分）且平均分大于等于90分的填为\优\，三门课程都及格且平均分大于等于80分、小于90分的填为\良\；三门课程都及格且平均分大于等于70分、小于80分的填为\中\；三门课程都及格且平均分小于70分的填为\及格\；其他的填为\差\。 菜单命令\返回\的功能是恢复标准的系统菜单。菜单程序生成后，运行菜单程序并依次执行\计算\和\返回\菜单命令。 基本操作题答案：
2、windowtype属性设为1 简单应用题答案：
2、crea view view1 as sele xuesheng.学号,姓名,数学,英语,信息技术 from xuesheng,chengji where xuesheng.学号=; chengji.学号and left(xuesheng.学号,8)=\学号 desc sele * from view1 into table table2 本题也可用设计器做，命令供做时参考 综合应用题答案：菜单项“计算”的过程代码如下：
select xuesheng.学号,姓名,数学,英语,信息技术 from chengji,xuesheng where chengji.学号=xuesheng.学号; order by xuesheng.学号 desc into table table3 alter table table3 add column 等级 c(4)
update table3 set 等级='优' where 数学>=60 and 英语>=60 and 信息技术>=60 and (数学+英语+信息技术)>=270 update table3 set 等级='良' where 数学>=60 and 英语>=60 and 信息技术>=60 and (数学+英语+信息技术)>=240; and (数学+英语+信息技术)<270
update table3 set 等级='中' where 数学>=60 and 英语>=60 and 信息技术>=60 and (数学+英语+信息技术)>=210; and (数学+英语+信息技术)<240
update table3 set 等级='及格' where数学>=60 and 英语>=60 and 信息技术>=60 and (数学+英语+信息技术)>=180; and (数学+英语+信息技术)<210
update table3 set 等级='差' where 等级=\
菜单项“返回”命令代码为：SET SYSMENU TO DEFAULT
第 64 套
一、基本操作题（共4小题，第1和2题是7分、第3和4题是8分）
1. 打开表单one（如图1所示），通过设置控件的相关属性，使得表单运行时的开始焦点在\打开\命令按钮，并且接下来的焦点
图1
的移动顺序是\关闭\和\退出\
2. 打开表单two（如图2所示），使用\布局\工具栏的\顶边对齐\按钮将表单中的三个命令按钮控件的顶边对齐（如图3所示）。 3. 使用SQL语句创建一个名为\分组情况表\的自由表，\分组情况表\有两个字段：组号和组名，组号占两个字符，组名占10个字符。请将该SQL语句存储在three.prg中，否则不得分。 4. 使用SQL语句插入一个记录到\分组情况表\中，插入的内容是，组号：\，组名：\通俗唱法\。请将该SQL语句存储在four.prg中，否则不得分。
二、简单应用（2小题，每题20分，计40分）
1. 歌手比赛分为四个组，\歌手表\中的\歌手编号\字段的左边两位表示了该歌手所在的组号。考生目录下的程序文件five.prg的功能是：根据\歌手表\计算每个组的歌手人数，将结果填入表 one.dbf，表one.dbf中有两个字段：\组号\和\歌手人数\。程序中有三处错误，请修改并执行程序。注意：只能修改标有错误的语句行，不能修改其他语句，数组名A不允许修改。
2. 建立一个数据库文件\歌手大奖赛.dbc\，并将\歌手表\、\评委表\和\评分表\三个自由表添加到该数据库中。使用视图设计器建立视图 songer_view，该视图根据\歌手表\、\评委表\和\评分表\建立，视图中的字段项包括：评委姓名、歌手姓名、分数，视图中的记录按\歌手姓名\升序、\分数\降序排列。 三、综合应用（1小题，计30分）
1. 建立一个文件名和表单名均为myform的表单，表单中包括一个列表框（List1）和两个命令按钮（Command1和Command2），Command1和Command2的标题分别为\计算\和\退出\。2. 列表框（List1）中应显示组号，通过 RowSource和RowSourceType属性手工指定列表框的显示条目为 01、02、03、04（注意不要使用命令指定这两个属性，否则将不能得分）。3. 为\计算\命令按钮编写程序。程序的功能是：表单运行时，根据列表框中选定的\组号\，将\评分表\中该组歌手（\歌手编号\字段的左边两位表示了该歌手所在的组号）的所有记录存入自由表 two.dbf中，two.dbf的表结构与\评分表\相同，表中的记录先按\歌手编号\降序、再按\分数\升
第 40 页, 共 56 页