电子科技大学网络教育考卷A

1、电子科技大学网络教育考卷A作者:日期:电子科技大学网络教育考卷（A卷）（20年至20学年度第学期）考试时间 年 月 日（120分钟）课程 数据库程序设计基础教师签名大题号一二三四五六七八九十合计得分一、单项选择题（每小题1分，共30分）1、 统计女生人数并将结果存放于变量X中的命令是 COUNT FOR .NOT. 性别="男 ” TO X COUNT FOR （ 性别="女"）=.TO X SUM FOR （ 性别 <>"男"）=.TO X SUM FOR 性别="女” TO X2、 在已打开的表中，要永久删除当前记录位

2、置开始的10条记录，可用 先执行 DELETE NEXT 10 命令，后用 PACK 命令 先执行 DELETE RECORD 10 命令，后用 PACK 命令 先执行 DELETE FOR RECORD> 10 命令，后用 PACK命令 ZAP NEXT 103、 按数值型字段“总分”进行索引，使其按降序排列的命令是 INDEX ON -总分 TO WP INDEX ON 总分 /A TO WP INDEX ON 总分 TO WP INDEX ON 总分 /D TO WP4、 下列操作后，不改变表记录指针的命令是 RECALL LISTSUM REPL ALL5、按照数据库的数据模型分

3、类，VFP属于层次型关系型网状型混合型6、函数 LEN(SPACE(5)-SPACE(1)的返回值是 错误信息17 647、某表文件中有日期型字段“出生日期”，设N='01/01/80',下列命令正确的是 LOCATE FOR 出生日期='01/01/80' LOCATE FOR 出生日期=&N LOCATE FOR DTOC（出生日期）=N LOCATE FOR DTOC（出生日期）=CTOD（N）8、 从表customer中提取所有记录生成查询，并将查询结果存放于表 MyCursor的SQL命令为 SELECT * FROM customer INT

4、O CURSOR MyCursor SELECT * FROM customer INTO TABLE MyCursor SELECT ALL FROM customer INTO TABLE MyCursor CREATE SQL VIEWMyCursor ASSELECT * FROM customer9、 下列概念中，正确的是 在一个工作区中只能打开一个表文件，打开新的表文件后，原来所打开的表文件就自动关闭 一个表文件可以在不同的工作区同时打开 一个工作区中可以同时打开多个表文件 一个表文件可以在不同的工作区同时打开，且一个工作区中可以同时打开多个表10、 将2009年国庆节的日期送入内

5、存变量ND的方法是 ND=DTOC("10/01/09") ND=CTOD("10/01/09") STORE DATE()TO ND STORE 10/01/09 TO ND11、 表文件 DD.DBF有100条记录，当前记录号是 10，执行DISPLAY ALL 命令后，记录指针向的记录号是 10010110112、 执行命令：ACCEPT "请输入出生日期：” TO MDATE 时，如果通过键盘输入CTOD("01/01/69")，贝U MDA TE 的值应当是 CTOD("01/01/69")&q

6、uot;01/01/69"01/01/69拒绝接受，MDATE 不赋值13、 在表结构中，逻辑型、日期型、备注型字段的宽度分别固定为3,8,4 1,6,41,8,任意 1,8,414、 表与相应索引文件已经打开，内存变量XM="李春"，执行时会产生逻辑错误的命令是 LOCATE FOR 姓名=XM FIND &XM SEEK XM LOCATE FOR 姓名=&XM15、 以下命令中正确的是 STORE 8 TO X,Y STORE 8,9 TO X,Y X=8,Y=9 X=Y=816、 在非嵌套程序结构中，可以使用LOOP和EXIT语句的基本程序

7、结构是 TEXT-ENDTEXT DO WHILE-ENDDO IF-ENDIF DO CASE-ENDCASE17、 下面可使程序单步执行的命令是 SET STEP ON SET ESCAPE ON SET DEBUG ON SET STEP OFF18、 如果想从字符串"成都市"中取出汉字"都"，应该用函数 SUBSTR(” 成都市",2,2)SUBSTR(” 成都市",2,1)SUBSTR(” 成都市",3,1)SUBSTR(” 成都市",3,2)19、 若使用 REPLACE命令时，其范围子句为ALL或RE

8、ST ,则执行该命令后，记录指针指向首记录末记录首记录的前面末记录的后面20、 若要恢复用 DELETE命令删除的若干记录，应该 用RECALL命令立即按ESC键用 RELEASE 命令 用 FOUND 命令21、 执行命令 STORE CTOD('03/09/94') TO A 后，变量 A的类型为 日期型 数值型备注型 字符型22、 在Visual FoxPro中，数据环境指定义表单或表单集时使用的 数据数据库数据源数据项23、 "电子科技大学”这六个汉字作为字符串常量，在VFP中，可表示为 电子科技大学(电子科技大学)电子科技大学 "电子科技大学”24

9、、 在VFP中，INPUT,APPEND,W AIT三条命令中可以接受字符的命令是 只有 ACCEPT 只有 ACCEPT 和 WAIT都可以只有WAIT25、 下列VFP表达式运算结果为日期型的是 04/05/97-2 CTOD('O4/O5/97') - DATE() CTOD('04/05/97')-3 DATE( )"04/05/97"26、 职工工资数据库文件按基本工资字段升序索引后，再执行GO TOP命令，此时当前记录号是 1基本工资最少的记录号 0基本工资最多的记录号27、 当前数据库文件有 20条记录，当前记录号是10。执行命

10、令LIST REST以后，当前 记录号是102021128、对学生成绩数据库文件按总分 /N/6.2降序、姓名/C/8升序索引。应当使用命令 INDEX TO ABC ON 总分，姓名 INDEX TO ABC ON -总分，姓名 INDEX TO ABC ON STR(- 总分，5,1)+姓名 INDEX TO ABC ON STR(1000- 总分)+ 姓名29、 把当前数据库文件中"性别”字段的值全部清除，但仍保留该字段，应当使用命令 MODIFY STRUCTURE DELETE REPLACE ZAP30、 命令SELECT 0的功能是 选择区号最小的空闲工作区 选择区号最

11、大的空闲工作区 选择当前工作区的区号加1的工作区 随机选择一个工作区的区号二、判断题(正确的划"，错误的划X,每小题 1分，共10分)(x )1、对象具有属性，而属性只能在设计阶段设置。(X )2、一条命令可分几行写，在行结束处用“：”表示一行未完，转入下一行。(V )3、建立自由表分两步：定义表结构和输入数据。(V )4、表间的关系分三种：一对一关系、一对多关系和多对多关系。(V )5、若要使用多个表，就要使用多个工作区。(V )6、在应用程序中可以通过使用该工作区的表的别名来标识工作区。(V )7、报表包括两个基本组成部分：数据源和布局。(V )8、视图与查询相类似的地方是：可以

12、用来从一个或多个相关联的表中提取有用信息。(V )9、视图与表相类似的地方是：可以用来更新其中的信息，并将更新结果永久保存在磁 盘上。(V )10、一个视图在使用时，将作为临时表在自己的工作区中打开。三、简答题(每小题 5分，共10分)1、FOR条件和 WHILE条件有何区别？答：当FOR和WHILE在同一条命令语句中使用时，系统规定WHILE子句优先。这两种子句的差别是：FOR子句能在整个数据表文件中筛选出符合条件的记录，而WHILE子句从当前记录开始顺序查找出满足条件的记录，一旦发现下面有一条记录不满足条件，就终止寻找。2、GO TOP和GO 1在什么情况下其作用相同？在什么情况下不同？答

13、：(1)当表文件中有记录且没有主控索引时，GO TOP和GO 1是等价的。(2)GO TOP和GO 1作用不同时的情况如下： 如果当前文件没有记录，执行GO TOP,系统不会出错，而执行GO 1系统将报告记录越界。这时 RECNO()的值仍为 1，而 RECCOUNT()=0。 如果当前数据表文件有记录且有主控索引，执行GO TOP ,系统将当前记录指针定位在主控索引的第一条记录上；而执行GO 1系统将当前记录指针绝对定位在数据表文件的第一条记录上。四、程序填空题(请在横线上填入合适的语句，将程序补充完整。每小题5分，共15分)1、SET TALK OFFACCEPT "输入表名：”

14、 TO KMUSE &KM3 *显示最前面5条记录DISP NEXT 5WAITGO BOTTOM*显示最后4条记录SKIP £DISP NEXT 4USE2、 有12个结构完全相同的表 WY01,WY02,.WY11,WY12,下列程序完成的功能是：顺序 打开每一个表并浏览之SET TALK OFFG=1DO WHILE G<13DO CASECASE G<10GW='WY0'+STR(G ,1)CASE G>=10GW='WY'+ STR(G ,2)ENDCASEUSE &GWBROWG=G+1USEENDDORE

15、TU3、对 TEACHER.DBF 中的每条记录的 SALARY 字段作如下变化：若SALARY>=3000 ,则上浮 3%，若 SALARY<3000，贝U上浮6%USE TEACHERSCANIF salary >= 3000REPLACE salary WITH salary * 1.03ELSEREPLACE salary WITH salary * 1.06ENDIFENDSCANUSE五、程序分析题(请将程序运行后的输出结果写在横线上。每小题5分，共15分)1、*a.prgs=0FOR i=1 TO 5s=s+iENDFOR?"s=",s输出结果：s=152、CLEARSTORE 2 TO I,C,TDO WHILE l<=4DO PR?"F("+STR(l,1)+")="+STR(C,2)1=1+1ENDDO?"T="+STR(T,2)RETURNPROCEDURE PRC=C*2T=T+CRETURN输出结果：答: F(2)=4F(3)=8F(4)=16T=303、i=1DO WHILE i<10i=i+2ENDDO?i输出结果：11六、编程题(每小题 10分，共20分)1、编程在屏幕上显示“九九”乘法口诀表。SET TALK OFFCLEARFO