1、2010秋江苏二级 Visual+FoxPro上机真题 2及答案解析(总分：40.00，做题时间：70 分钟)一、(本试卷完成时间为 70分钟)(总题数：1，分数：0.00)1.项目、数据库和表操作(12 分) 打开 T盘根目录中的项目文件 JXGL,在该项目中已有一数据库 JXSJ。 1.在JXSJ数据库中按如下表格中所示的结构创建 AB.DBF表,并按表格中的要求设置相关属件。 （分数：12.00）_2.设计查询(8 分) 课程表(KC)中含有课程代码(kcdm,C)、课程名称(kcmc,c)和学分(xf,N)等字段,在成绩表(CJ)中含有学生学号(xh,c)、成绩(cj,N)、课程代码(
2、kcdm,c)等字段。按如下要求修改 JXGL项目中的查询 CHAXUN: 若成绩不低于 60分学生可以取得对应课程的学分,总学分大于或等于 20的学生可以毕业,则基于 Kc表和 cJ表查询所有不能毕业的学生列表。要求查询输出字段为:学号、总学分,查询结果按总学分降序排序。（分数：8.00）_3.设计菜单(5 分) JXGL 项目中已存在菜单 MENU,其中已定义了“文件“菜单栏及其中的“退出菜单“项。按如下要求设计菜单,完成后的运行效果如图 1所示。 1.在“文件“菜单栏右侧创建“教学管理“菜单栏； 2.在“教学管理“菜单栏下创建子菜单“学生“和“课程“； 3.为“学生“菜单项设置跳过条件:
3、xs 表打开时才可操作； 4.在菜单项“学生“和“课程“之间插入分组线； 5.设置整个菜单的清理代码:CLOSE TABLES ALL。（分数：5.00）_4.设计表单(10 分) JXGL 项目中已经存在表单 Formj,该表单用来设置表单中表格控件 Grd1的相关属性,如图 2所示。按下列要求修改表单: 1.设置表单的标题为“表格属性设置“； 2.设置表格 Grd1中的数据为只读,但能获得焦点,表格的 RecordSourceType属性值为“0 一表“； 3.在“数据源“标签控件右侧添加一个组合框控件,并设置其 Name属性为“Cbo2“、RowSourceType 属性为“7 一文件“
4、、RowSource 属性为当前目录下的所有.DBF 文件； 4.设置复选框控件 Checkl的初始状态为选中: 5.为组合框控件 Cbo1编写 Init事件代码,使它的初值等于“3(缺省值)水平滚动条和垂直滚动条“(即初始选中下拉列表中的第 4条列表项)；6.为组合框控件 Cbo2编写 InterActiveChange事件代码,使表单中 Grd1控件的 RecordSource属性与Cbo2中选定的值一致。（分数：10.00）_5.程序改错(5 分) 下列程序的功能是:输入一个由 ASCII码字符和 GB2312字符集中汉字字符组成的字符串后,统计并显示出现次数最多的 10个字符及其出现次
5、数。要求: 1.将下列程序输入到项目中的程序文件PCODE中,并对其中的 2条错误语句进行修改； 2.在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。 CLEAR ACCEPT 请输入: TO cccc FROM jxsj!kc INNER JOIN jxsj!cj; ON kc.kcdm=cj.kcdm; GROUP BY cj.xh; HAVING总学分解析：3.设计菜单(5 分) JXGL 项目中已存在菜单 MENU,其中已定义了“文件“菜单栏及其中的“退出菜单“项。按如下要求设计菜单,完成后的运行效果如图 1所示。 1.在“文件“菜单栏右侧创建“教学管理“菜单栏
6、； 2.在“教学管理“菜单栏下创建子菜单“学生“和“课程“； 3.为“学生“菜单项设置跳过条件:xs 表打开时才可操作； 4.在菜单项“学生“和“课程“之间插入分组线； 5.设置整个菜单的清理代码:CLOSE TABLES ALL。（分数：5.00）_正确答案：(跳过条件表达式:NOT USED(“xs“)解析：4.设计表单(10 分) JXGL 项目中已经存在表单 Formj,该表单用来设置表单中表格控件 Grd1的相关属性,如图 2所示。按下列要求修改表单: 1.设置表单的标题为“表格属性设置“； 2.设置表格 Grd1中的数据为只读,但能获得焦点,表格的 RecordSourceType
7、属性值为“0 一表“； 3.在“数据源“标签控件右侧添加一个组合框控件,并设置其 Name属性为“Cbo2“、RowSourceType 属性为“7 一文件“、RowSource 属性为当前目录下的所有.DBF 文件； 4.设置复选框控件 Checkl的初始状态为选中: 5.为组合框控件 Cbo1编写 Init事件代码,使它的初值等于“3(缺省值)水平滚动条和垂直滚动条“(即初始选中下拉列表中的第 4条列表项)；6.为组合框控件 Cbo2编写 InterActiveChange事件代码,使表单中 Grd1控件的 RecordSource属性与Cbo2中选定的值一致。（分数：10.00）_正确答
8、案：( )解析：5.程序改错(5 分) 下列程序的功能是:输入一个由 ASCII码字符和 GB2312字符集中汉字字符组成的字符串后,统计并显示出现次数最多的 10个字符及其出现次数。要求: 1.将下列程序输入到项目中的程序文件PCODE中,并对其中的 2条错误语句进行修改； 2.在修改程序时,不允许修改程序的总体框架和算法,不允许增加或减少语句数目。 CLEAR ACCEPT 请输入: TO cccc &该语句功能是交互式地输入数据(字符串) n=LEN(cccc) IF n=0 RETURN ENDIF CREATE CURSOR TEMP (cc c(2),nn i) &创建临时表存储字符及出现的次数 FOR i=1 TO n c=SUBS(CCCC,i,1) IF ASC(c)127 &汉字字符 c=SUBS(cccc,i,2) i=2 ENDIF LOCATE FOR cc=c IF EOF() INSERT INTO TEMP(cc,nn) VALUE(c,1) Other REPLACE nn WITH nn+1 ENDIF ENDFOR SELECT TOP 10 cc,nn FROM temp ORDER BY 2 DESC（分数：5.00）_正确答案：(1.i=2 改为 i=i+1 2.ohter 改为 else)解析：
