铜陵职业技术学院《℉P程序设计》模拟试卷三 一、选择题(1~25题每题2分，共50分) 下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项写在答题 纸相应位置上。 1、DBS的核心是()。 A)DBB)OSC)DBMSD)DBAS 2、设有部门和职员两个实体，每个职员只能属于一个部门，一个部门可以有多名职员， 则部门与职员之间的联系类型是()。 A)一对一B)一对多C)多对多D)不确定 3、下列关于日期或日期时间的表达式中，错误的是()。 A)(2005.01.0411:10:10AM-{2004.01.0411:10:10AM B)(^2005-01-04}+20 C){^2005-01-04}+{^2005-01-05} D){^2005-01-04}-20 4、执行下列语句后，主屏上显示的结果为()。 DIMENSIONm (5) m(1)=5 VARTYPE (m (5)) A)T.B)F.C)5D)L 5、下列表达式中，运算结果为逻辑真的是()。 A)EMPTY (SPACE (5))B)VAL ("5") C)STR (5)D)LIKE (ACD",AC?") 6、下列函数中，函数值类型为字符型的是()。 A)EOF (B)SUBSTR (DTOC (DATE ())7) C)AT("A","ABC")D)CTOD("01/04/05") 7、设x=123,y=456,m="x+y”则&m+7的值为()。 A)586B)x+yC)123D)456 8、表达式？IIF(LEN(SPACE(4))>3,2,-2)的值为()。 A)2B)-2C).T.D).F
铜陵职业技术学院《VFP 程序设计》模拟试卷三 一、选择题（1～25 题每题 2 分，共 50 分） 下列各题 A)、B)、C)、D)四个选项中,只有一个选项是正确的,请将正确选项写在答题 纸相应位置上。 1、DBS 的核心是（）。 A）DBB）OSC）DBMSD）DBAS 2、设有部门和职员两个实体，每个职员只能属于一个部门，一个部门可以有多名职员， 则部门与职员之间的联系类型是（）。 A）一对一 B）一对多 C）多对多 D）不确定 3、下列关于日期或日期时间的表达式中，错误的是（）。 A）{^2005.01.0411:10:10AM}-{^2004.01.0411:10:10AM} B）{^2005-01-04}+20 C）{^2005-01-04}+{^2005-01-05} D）{^2005-01-04}-20 4、执行下列语句后，主屏上显示的结果为（）。 DIMENSIONm（5） m（1）=5 ？VARTYPE（m（5）） A）.T.B）.F.C）5D）L 5、下列表达式中，运算结果为逻辑真的是（）。 A）EMPTY（SPACE（5））B）VAL（＂5＂） C）STR（5）D）LIKE（＂ACD＂,＂AC?＂） 6、下列函数中，函数值类型为字符型的是（）。 A）EOF（）B）SUBSTR（DTOC（DATE（）），7） C）AT（＂A＂,＂ABC＂）D）CTOD（＂01/04/05＂） 7、设 x=123,y=456,m=＂x+y＂则&m+7 的值为（）。 A）586B）x+yC）123D）456 8、表达式？IIF(LEN(SPACE(4))>3,2,-2)的值为（）。 A）2B）-2C）.T.D）.F
9、表达式？VARTYPE([01/04/2005])的值为()。 A)LB)XC)ND)C 10、表达式？MAX("12","6","203")的值为()。 A)12B)6C)203D)不确定 11、表达式？M0D(21,-5)的值为()。 A)-4B)4D)1D)-1 12、?R0UND(8955430,-4)的值为()。 A)895500B)8960000C)8950000D)错误信息 13、建立数据库表时，将工资字段值限制在1000到3000之间的这种约束属于()。 A)实体完整性B)域完整性C)参照完整性D)视图完整性 14、执行SELECT0选择工作区的结果是()。 A)选择了0号工作区B)选择了空闲的最小号工作区 C)选择了一个工作区D)出错信息 15、要从表文件中真正删除一条记录，应当()。 A)先用DELETE命令，再用ZAP命令。 B)直接用PACK命令。 C)先用DELETE命令，再用PACK命令。 D)直接用DELETE命令。 16、SQLSELECT语句为了将查询结果保存到临时文件中应使用()短语。 A)TOFILEB)INTOARRAY C)INTOCURSORD)INTODBF 17、SQL语句中，修改表结构的命令是()。 A>ALTERSTRUCTUREB)MODIFYSTRUCTURE C>ALTERTABLED>MODIFYTABLE 18、可以使用()命令打开视图设计器建立视图。 A>CREATETABLEB)CREATEDATABASE C>CREATEQUERYD)CREATEVIEW 19、默认情况下，VFP查询结果的输出去向是()。 A)浏览B)临时表C)图形D)数组 20、在查询设计器中，“排序依据”选项卡对应于SQL语句中的()短语
9、表达式？VARTYPE（[01/04/2005]）的值为（）。 A）LB）XC）ND）C 10、表达式？MAX（＂12＂,＂6＂,＂203＂）的值为（）。 A）12B）6C）203D）不确定 11、表达式？MOD（21，-5）的值为（）。 A）-4B）4D）1D）-1 12、?ROUND(8955430,-4)的值为（）。 A）895500B）8960000C）8950000D）错误信息 13、建立数据库表时，将工资字段值限制在 1000 到 3000 之间的这种约束属于（）。 A）实体完整性 B）域完整性 C）参照完整性 D）视图完整性 14、执行 SELECT0 选择工作区的结果是（）。 A）选择了 0 号工作区 B）选择了空闲的最小号工作区 C）选择了一个工作区 D）出错信息 15、要从表文件中真正删除一条记录，应当（）。 A）先用 DELETE 命令，再用 ZAP 命令。 B）直接用 PACK 命令。 C）先用 DELETE 命令，再用 PACK 命令。 D）直接用 DELETE 命令。 16、SQLSELECT 语句为了将查询结果保存到临时文件中应使用（）短语。 A）TOFILEB）INTOARRAY C）INTOCURSORD）INTODBF 17、SQL 语句中，修改表结构的命令是（）。 A）ALTERSTRUCTUREB）MODIFYSTRUCTURE C）ALTERTABLED）MODIFYTABLE 18、可以使用（）命令打开视图设计器建立视图。 A）CREATETABLEB）CREATEDATABASE C）CREATEQUERYD）CREATEVIEW 19、默认情况下，VFP 查询结果的输出去向是（）。 A）浏览 B）临时表 C）图形 D）数组 20、在查询设计器中，“排序依据”选项卡对应于 SQL 语句中的（）短语
A)ORDERBYB)GROUPBYC)HAVINGD)WHERE 21、执行如下语句后，结果为()。 STORE 123.TOX STORE A45 TOY ?VAL (Y+X) A)-123B)-123.A5C)0.00D)123 22、在D0-W阳ILE循环结构中，L0OP命令的作用是()。 A)退出循环，返回程序开始处 B)跳出本次循环，返回到DO-WILE处，开始下一个判断和循环。 C)终止循环，执行ENDDO下面的语句。 D)终止程序执行。 23、程序文件的扩展名为()。 A)DBCB)DBFC)PJXD)PRG 24、要修改标签(LABEL)控件上显示的文本内容，应修改它的() A)Caption属性B)Alignment属性C)Name属性D)Value属性 25、假定一个表单里有一个文本框Text1,如果要在代码中引用该文本框中的内容，则 下面()是正确的。 A)thisform.textl.captionB)thisform.textl.name C)thisform.textl.valueD)以上都不正确 二、填空题（每空1分，共10分） 1、执行以下命令后，B00K2的指针指向第()号记录。 SELECT2 USEBOOK1 SELECT3 USEBOOK2 SELECT2 SKIP2 2、在VFP中，如果表中的一个字段不是本表的主关键字或候选关键字，而是另一个表 的主关键字或候选关键字，这个字段就称为()。 3、在表单中确定控件是否可见的属性是()
A）ORDERBYB）GROUPBYC）HAVINGD）WHERE 21、执行如下语句后，结果为（）。 STORE＂123.＂TOX STORE＂A45＂TOY ?VAL(Y+X) A)-123B)-123.A5C)0.00D)123 22、在 DO-WHILE 循环结构中，LOOP 命令的作用是（）。 A）退出循环，返回程序开始处 B）跳出本次循环，返回到 DO-WHILE 处，开始下一个判断和循环。 C）终止循环，执行 ENDDO 下面的语句。 D）终止程序执行。 23、程序文件的扩展名为（）。 A）.DBCB）.DBFC）.PJXD）.PRG 24、要修改标签（LABEL）控件上显示的文本内容，应修改它的（） A）Caption 属性 B）Alignment 属性 C）Name 属性 D）Value 属性 25、假定一个表单里有一个文本框 Text1，如果要在代码中引用该文本框中的内容，则 下面（）是正确的。 A）thisform.text1.captionB）thisform.text1.name C）thisform.text1.valueD）以上都不正确 二、填空题（每空 1 分，共 10 分） 1、执行以下命令后，BOOK2 的指针指向第（）号记录。 SELECT2 USEBOOK1 SELECT3 USEBOOK2 SELECT2 SKIP2 2、在 VFP 中，如果表中的一个字段不是本表的主关键字或候选关键字，而是另一个表 的主关键字或候选关键字，这个字段就称为（）。 3、在表单中确定控件是否可见的属性是（）
4、可以在表设计器中建立字段有效性规则，其中在“信息”框中输入的表达式的类型 是()。（用大写字母表示） 5、参照完整性规则包括()、删除规则、插入规则。 6、执行下列操作后，显示结果为() A=DATE ( B=DTOC (A) M=VAL (B) VARTYPE (M) 7、设系统时间为2005年1月4日，下列表达式的值为()。 VAL(SUBS("123",2,1)+RIGHT(STR(YEAR(DATE())),2))+6 8、假定二维表AA有5条记录，则执行下列语句后，结果为()。 USEAA SKIP2 EOF ( 9、以下程序的执行结果为()。 A=1 DOWHILEA<=100 A=A*2 A=A+1 ENDDO A=100 ?A 10、通过查询设计器建立的查询文件的扩展名为()。 三、用SQL语句完成以下操作。（第6小题4分，其余各小题3分，共计25分） 本题要用到如下四个表： 仓库表（仓库号，城市，面积） 职工表（仓库号，职工号，工资） 订购单表（职工号，供应商号，订购单号，订购日期，总金额） 供应商表（供应商号，供应商名，地址） 1、检索出工资多于1230元的职工号和工资，并按工资降序排列
4、可以在表设计器中建立字段有效性规则，其中在“信息”框中输入的表达式的类型 是（）。（用大写字母表示） 5、参照完整性规则包括（ ）、删除规则、插入规则。 6、执行下列操作后，显示结果为（） A=DATE（） B=DTOC（A） M=VAL（B） ？VARTYPE（M） 7、设系统时间为 2005 年 1 月 4 日，下列表达式的值为（）。 VAL(SUBS(＂123＂,2,1)+RIGHT(STR(YEAR(DATE())),2))+6 8、假定二维表 AA 有 5 条记录，则执行下列语句后，结果为（）。 USEAA SKIP2 ？EOF（） 9、以下程序的执行结果为（）。 A=1 DOWHILEA<=100 A=A*2 A=A+1 ENDDO A=100 ?A 10、通过查询设计器建立的查询文件的扩展名为（ ）。 三、用 SQL 语句完成以下操作。（第 6 小题 4 分，其余各小题 3 分，共计 25 分） 本题要用到如下四个表: 仓库表（仓库号，城市，面积） 职工表（仓库号，职工号，工资） 订购单表（职工号，供应商号，订购单号，订购日期，总金额） 供应商表（供应商号，供应商名，地址） 1、检索出工资多于 1230 元的职工号和工资，并按工资降序排列
2、求在WH2仓库工作的职工的最高工资值。 3、检索出向S4供应商发出订购单的仓库所在的城市。 4、求每个仓库的平均工资。 5、删除仓库表中仓库号是"阳3"的记录。 6、给低于所有职工平均工资的职工提高10%的工资。 7、检索出在仓库"W阳1"或"W阳2"工作，并且工资小于1250元的职工号。 8、插入一个新的供应商，供应商号为S8,地址在沈阳，供应商名暂不输入。 四、分析下列程序。（每小题5分，共计15分） 1、以下程序的功能是统计专业代码（学号的第3、4位）为03的男女生人数。请在横 线上填上必要的语句。 OPENDATABASEXSXK USE学生INO SELECT学生 STOREOTOm,w LOCATEFOR DOWHILE.NOT.EOF O IF性别=.T. ELSE w=w+1 ENDIF CONTINUE ENDDO CLEAR ?"男生人数：”，m ?”女生人数：”，w 2、写出下列程序的运行结果。 SETTALKOFF DIMENSIONA (5) M=1 DOWHILEM<=5
2、求在 WH2 仓库工作的职工的最高工资值。 3、检索出向 S4 供应商发出订购单的仓库所在的城市。 4、求每个仓库的平均工资。 5、删除仓库表中仓库号是＂WH3＂的记录。 6、给低于所有职工平均工资的职工提高 10%的工资。 7、检索出在仓库＂WH1＂或＂WH2＂工作，并且工资小于 1250 元的职工号。 8、插入一个新的供应商，供应商号为 S8，地址在沈阳，供应商名暂不输入。 四、分析下列程序。（每小题 5 分，共计 15 分） 1、以下程序的功能是统计专业代码（学号的第 3、4 位）为 03 的男女生人数。请在横 线上填上必要的语句。 OPENDATABASEXSXK USE 学生 IN0 SELECT 学生 STORE0TOm,w LOCATEFOR DOWHILE.NOT.EOF() IF 性别=.T. ELSE w=w+1 ENDIF CONTINUE ENDDO CLEAR ?＂男生人数：＂，m ?＂女生人数：＂,w 2、写出下列程序的运行结果。 SETTALKOFF DIMENSIONA（5） M=1 DOWHILEM<=5
A(M)=M+1 M=M+1 ENDDO FORN=4TOISTEP-1 A(N)=A(N)-A(N+1) ENDFOR ?A(1),A(5) 程序结果为：。 3、成绩管理库中有如下三个表： 学生.DBF:学生C(8),性别C(2),出生日期D,院系C(8) 课程.DBF:课程编号C(4),课程名称C(10),开课院系C(8》 选课.DBF:学号C(8),课程编号C(4),成绩I 以下程序的功能是：先为”学生"表增加一个"平均成绩”字段，数据类型为N(6,2), 然后根据"选课”表统计每个学生的平均成绩，并将求得的平均成绩写入相应的”平均字 段"中。 该程序有三处错误（己用横线标出），请改正之，使程序能正确运行。 OPENDATABASE成绩管理 USE选课INO USE学生INO MODIFYTABLE学生ADD平均成绩N(6,2) SELECT学生 DOWHILEEOF ( SELECTAVG(成绩)FROM选课： WHERE学号=学生，学号INTOARRAYCJ REPLACE平均成绩=CJ(1) CJ(1)=0 SKIP ENDDO CLOSEDATABASE
A（M）=M+1 M=M+1 ENDDO FORN=4TO1STEP-1 A（N）=A（N）-A（N+1） ENDFOR ？A（1），A（5） 程序结果为：。 3、成绩管理库中有如下三个表： 学生.DBF：学生 C（8），性别 C（2），出生日期 D，院系 C（8） 课程.DBF：课程编号 C（4），课程名称 C（10），开课院系 C（8） 选课.DBF：学号 C（8），课程编号 C（4），成绩 I 以下程序的功能是：先为＂学生＂表增加一个＂平均成绩＂字段，数据类型为 N（6，2）， 然后根据＂选课＂表统计每个学生的平均成绩，并将求得的平均成绩写入相应的＂平均字 段＂中。 该程序有三处错误（已用横线标出），请改正之，使程序能正确运行。 OPENDATABASE 成绩管理 USE 选课 IN0 USE 学生 IN0 MODIFYTABLE 学生 ADD 平均成绩 N（6，2） SELECT 学生 DOWHILEEOF（） SELECTAVG（成绩）FROM 选课； WHERE 学号=学生.学号 INTOARRAYCJ REPLACE 平均成绩=CJ（1） CJ（1）=0 SKIP ENDDO CLOSEDATABASE
答案 、选择题(1~25题每题2分，共50分) 1、C 2、B 3、C 4、D 5、A 6、B 7、A 8、A 9、D 10、B 11、A 12、B 13、B 14、B 15、C 16、C C 17、 18、D 19、A 20、A 21、C 22、B 23、D 24、A 25、C 二、填空题（每空1分，共10分） 1、1 2、外部关键字 3、Visible 4、C 5、更新规则 6、N 7、211.00 8、.F. 9、100 10、.qpr 三、用SQL语句完成以下操作。（第6小题4分，其余各小题3分，共计25分） 1、SELECT职工号，工资FROM职工表HERE工资>1230： ORDERBY工资DESC 2、SELECTMAX(工资)FROM职工表WHERE仓库号=“WH阳2” 3、SELECTDISTINCT城市FROM仓库表，职工表，订购单表： W阳ERE供应商号=“S4”AND职工表.职工号=订购单表.职工号： AND仓库表.仓库号=职工表.仓库号 4、SELECT仓库号，AVG(工资)FROM职工表GROUPBY仓库号 5、DELETEFROM仓库表WHERE仓库号=‘WH3' 6、UPDATE职工表： SET工资=工资*1.10： WHERE工资<(SELECTAVG(工资)FROM职工表) 7、SELECT职工号FROM职工： WHERE工资<1250AND(仓库号=“W阳1”OR仓库号=“WI2”) 8、INSERTINTO供应商表（供应商号，地址）： VALUES(S8',‘沈阳')
答案 一、选择题（1～25 题每题 2 分，共 50 分） 1、C 2、B 3、C 4、D 5、A 6、B 7、A 8、A 9、D 10、B 11、A 12、B 13、B 14、B 15、C 16、C 17、C 18、D 19、A 20、A 21、C 22、B 23、D 24、A 25、C 二、填空题（每空 1 分，共 10 分） 1、1 2、外部关键字 3、Visible 4、C 5、更新规则 6、N 7、211．00 8、.F. 9、100 10、.qpr 三、用 SQL 语句完成以下操作。（第 6 小题 4 分，其余各小题 3 分，共计 25 分） 1、SELECT 职工号，工资 FROM 职工表 WHERE 工资>1230； ORDERBY 工资 DESC 2、SELECTMAX（工资）FROM 职工表 WHERE 仓库号=“WH2” 3、SELECTDISTINCT 城市 FROM 仓库表，职工表，订购单表； WHERE 供应商号=“S4”AND 职工表.职工号=订购单表.职工号； AND 仓库表.仓库号=职工表.仓库号 4、SELECT 仓库号，AVG（工资）FROM 职工表 GROUPBY 仓库号 5、DELETEFROM 仓库表 WHERE 仓库号=‘WH3’ 6、UPDATE 职工表； SET 工资=工资*1.10; WHERE 工资<(SELECTAVG（工资）FROM 职工表) 7、SELECT 职工号 FROM 职工； WHERE 工资<1250AND（仓库号=“WH1”OR 仓库号=“WH2”） 8、INSERTINTO 供应商表（供应商号，地址）； VALUES（‘S8’，‘沈阳’）
四、分析下列程序。（每小题5分，共计15分） 1、SUBSTR(学号，3,2)=‘03 m=m+1 2、程序结果为：46 3、ALTERTABLE学生ADD平均成绩N(6,2) DOWHILENOTEOF REPLACE平均成绩WITHCJ(1)
四、分析下列程序。（每小题 5 分，共计 15 分） 1、SUBSTR（学号，3，2）=‘03’ m=m+1 2、程序结果为：46 3、ALTERTABLE 学生 ADD 平均成绩 N（6，2） DOWHILENOTEOF（） REPLACE 平均成绩 WITHCJ（1）