第二部分 Visual FoxPro 程序设计
一、选择题
21.关键字是关系模型中的重要概念。当一个二维表（A表）的主关键字被包含到另一个二维表（B表）中时，它就称为B表的 (21) 。
A.主关键字 B.候选关键字 C.外部关键字 D.超关键字
22.对于下列函数来说，其返回值的数据类型不为数值型的是 (22) 。
A. LEN(\ B. YEAR(DATE()) C. ATC(\ D. LEFT(\23.设变量x的值为\\（其长度为4，末尾为一个空格字符），变量y值为\abc\（其长度为4，第一个字符为空格）,则表达式LEN(x+y)和LEN(x-y)返回值分别为 (23) 。
A. 6, 6 B. 7, 7 C. 8, 8 D. 8, 7 24.在下列关于数据库表和临时表（Cursor）的叙述中，正确的是 (24) 。
A.数据库表随着所在的数据库的打开而打开，也随着其所在的数据库的关闭而关闭 B.基于数据库表创建的临时表随着数据库的打开而打开，也随着数据库的关闭而关闭 C.用BROWSE命令可浏览数据库表，也可浏览临时表 D.临时表被关闭后，可使用USE命令再次将其打开 25.设某数据库中的学生表（XS.DBF）已在2号工作区中打开,且当前工作区为1号工作区,则下列命令中不能将该XS表关闭的是 (25) 。
A. CLOSE TABLE B. CLOSE DATABASE ALL C. USE IN 2 D. USE
26.首先执行CLOSE TABLES ALL命令,然后执行 (26) 命令,可逻辑删除JS（教师）表中年龄超过60岁的所有记录（注：csrq为日期型字段，含义为出生日期。
A. DELETE FOR YEAR(DATE()-YEAR(CSRQ))>60
B. DELETE FROM js WHERE YEAR(DATE())-YEAR(csrq)>60 C. DELETE FROM js for YEAR(DATE()-YEAR(CSRQ))>60 D. DELETE FROM js WHILE YEAR(DATE())-YEAR(csrq)>60
27.对表单中的一个文本框控件来说，下列事件中最后发生的事件是 (27) 。
A. Valid B. Init C. Destroy D. Lostfocus 28.将表单中的所有文本框的Enabled属性设置为假，可在表单的Init事件处理代码中用SetAll方法进行设置。下列表述中，命令正确的是 (28) 。 A. THISFORM.SetAll(\ \B. THISFORM.SetAll(Enabled,.F., Text)
C. THISFORM.SetAll(\ \D. THISFORM.SetAll(\
29.在下列几种控件中，无Value属性的是 (29) 。
A.命令按钮（Command） B.选项按钮（OptionButton） C.复选框（CheckBox） D.编辑框（EditBox） 30.下列有关报表的叙述中，错误的是 (30) 。
A.定义报表有两个要素，即报表的数据源与报表的布局
B.在报表中若设置数据分组，可设置每组数据从新的一页开始打印 C. 在报表中若设置数据分组，最多可以设置一个分组依据
D.报表可以不设定数据环境，即报表内容可以不与任何表和视图相关
11
二、填空题
1.数据库中的数据按一定的数据模型组织、描述和储存，具有较小的数据 (1) 度，较高的数据独立性和易扩展性，并可以供各种用户共享。
2.数据模型是数据库系统中用于数据表示和操作的一组概念和定义。数据模型通常由3部分组成，即数据结构、数据操作和数据的 (2) 约束条件。 3.Visual FoxPro系统支持3种不同的索引文件，即 (3) 索引文件、非结构复合索引和独立索引文件。 4.在面向对象的程序设计中，通过类可以简化应用程序的设计，因为类具有 (4) 、多态性、封装性、抽象性等特点。
5.函数LEN(STR(123456789012))的返回值为 (5) ，函数LEN(DTOC(DATE(),1))的返回值为 (6) 。
6.设在1号工作区中打开XS表，若要求在2号工作区中再次打开XS表且别名设置为XUESHENG，则可使用命令：USE xs (7) xuesheng IN 2 AGAIN
7.数据库表的触发器（Trigger）是在对表的记录进行操作时被触发的规则。在VFP中，触发器分为3种类型，即更新触发器、删除触发器和 (8) 触发器。
8.利用DBEGTPROP9()函数，可以获得当前数据库的属性设置信息，或当前数据库中的表、表字段或视图的属性设置信息。例如，要获取当前数据库SJK中XS表的xb字段的默认值，可以使用函数DBGETPROP(\
9.某数据库表GP.DBF包含的字段分别是dm（股票代码，字符型）、mc（股票名称，字符型）、jg（当前价格，数值型）和zdf（与上个交易日相比涨跌幅的百分数，数值型），其部分数据如下表所示（zdf值为正数表示上涨，负数表示下跌）：
dm 600088 600143 600220 600266 600519 600839 600887 ?? mc 中视传媒 金发科技 江苏阳光 北京城建 贵州茅台 四川长虹 伊利股份 jg 25.56 32.16 9.00 31.39 105.51 7.59 31.33 zdf 3.02 -2.25 -1.96 2.62 -0.53 -1.30 1.46 下列SQL命令查询并显示上涨的股票信息（若上涨股票超过10种，则仅显示上涨幅度最大的前10种股票信息）。 SELECT (10) dm AS 股票代码，mc AS 股票名称，jg AS 涨跌幅； FROM gp； (11) ； ORDER BY zdf DESC
10.在教学管理数据库SJK中有2个表：KC.DBF（课程表）和CJ.DBF（成绩表），表结构如下：
KC.DBF CJ.DBF 则可用下列SQL命
字段名 含义 字段类型及宽度 令查询总学分大于100字段名 含义 字段类型及宽度 KCDH 课程代号 XH C（3） 学号 C（10） 的学生的学号和学分。KCM KCDH 课程代号 课程名 C（26） C（3） （注：成绩为60或60XF CJ 学分 N（2） 成绩 N（3） 以上才能获得相应学分，否则学分为0）：
12
SELECT CJ.Xh,SUM( (12) ) AS 总学分； FROM Sjk!Kc INNER JOIN Sjk!Cj； WHERE Cj.Kcdh=Kc.Kcdh； GROUP BY Cj.Xh； (13) 总学分>100
11.已知数据库表KCYZ.DBF含有5个字段,若其中有一个名为bxk的逻辑型字段,则可用下列
SQL命令查询bxk字段值为.T.的所有记录，输出结果保存在表TEMP.DBF中。 SELECT (14) FROM KCYZ； WHERE bxk=.T.； (15) Table temp
12.在VFP命令窗口中输入并执行命令 (16) .FontSize=20，可以使VFP主窗口中
输出文本的字号设置为20。
13.某单位人力资源管理系统中有人员档案表RYB.DBF和员工收入表SRB.DBF，其结构分别
如下：
RYB.DBF SRB.DBF 某表单运行后如下
字段名 含义 字段类型及宽度 字段名 含义 字段类型及宽度 所示，其数据环境包含
GH GH 工号 C（8） 工号 C（8） RYB.DBF和SRB.DBF表。
XM SRXM 收入项目 姓名 C（8） C（3） 表单上有3个文本框，
XB SRRQ 收入日期 D 性别 C（2） 其对象名分别为
CSRQ D JE Y 出生日期 金额 Text1、Text2和Text3，
ZW BZ M 职务 C（10） 备注 分别用于显示总收入、
所得税和实际收入。
列表框（List1）的InteractiveChange事件代码的功能是：当选中列表框中一名员工时，表格（Grid1）中显示出该员工的收入项目、收入日期、金额和备注，且表格中数据只读，文本框Text1、Text2和Text3分别显示该员工的总收入、所得税和实际收入。（注：所得税计算的算法见代码） （1）根据以上所示的表单，填写列表框、表格和“退出”命令按钮的有关属性值： ? 列表框的RowSourceType属性的值为“2—别名”
RowSource属性为 (17)
ColumnCount属性为 (18)
? 表格的 (19) 属性值为.T.（实现数据只读） ? 命令按钮的Caption属性值为 (20) （2）列表框List1的InteractiveChange事件代码如下：
cGh=ALLTRIM(THIS.value) &&变量cGh已在表单的Init事件代码中设置为公共变量 SELECT SUM(je) FROM srb WHERE gh=cGh INTO (21) m &&变量m为数组 DO CASE &&根据该月份的总收入分段计算所得税 CASE m(1)>1600 AND m(1)<2101 nse=(m(1)-1600)*0.05 CASE m(1)>2100 AND m(1)<3601
13
nse=500*0.05+(m(1)-2100)*0.1 CASE m(1)>3600 AND m(1)<6601 nse=500*0.05+1500*0.1+(m(1)-3600)*0.15 CASE m(1)>6600 nse=500*0.05+1500*0.1+3000*0.15+(m(1)-6600)*0.2 ENDCASE
THISFORM.Text1.value=m(1)
THISFORM.Text2.value= (22)
THISFORM.Text3.value= THISFORM.Text1.value- THISFORM.Text2.value SELECT (23) SET FILTER TO gh=cGh GO TOP
THISFORM.REFRESH
14.完善下列程序，计算3+33+333+3333+33333+??前十项之和。
CLEAR m=3 n=0 s=0 FOR i=1 to 10 n= (24) s=s+n ENDFOR
15.完善下列程序，使两个程序的功能相同。
【程序清单1】 CLEAR s=0 p=1
FOR i=1 to 20
p= (25) s=s+p ENDFOR ?s
【程序清单2】 CLEAR s=0 n=1
FOR i=1 to 20 m=1
FOR n=1 to i m=m*n ENDFOR s=s+m ENDFOR ?s
16.执行下列主程序后，输出结果为 (26) 。
****主程序**** CLEAR
14
PUBLIC x,y,z x=3 y=4 z=5 DO PP ?x+y+z
****过程**** PROCEDURE PP LOCAL x x=5 y=7 z=x+y ENDPROC
17.完善下列程序后，使程序的运行结果如下图所示。
CLEAR FOR i=1 to 9 For j=1 to 9 IF i<=j ??STR(i,1)+\ ENDIF ENDFOR (28) ENDFOR
18.将菜单设置为VFP系统默认菜单的命令是SET (29) TO DEFAULT。 19.在Visual FoxPro系统中，建立事件循环的命令为 (30) 。
15
江苏省计算机二级考试真题汇总
