版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、电子科技大学网络教育考卷(A 卷) (20 年至 20 学年度第 学期) 考试时间 年 月 日(120分钟) 课程 数据库程序设计基础 教师签名_ 大题号 一 二 三 四 五 六 七 八 九 十 合 计 得 分 一、单项选择题(每小题 1 分,共 30 分) 1、统计女生人数并将结果存放于变量 X中的命令是_ COUNT FOR .NOT. 性别="男" TO X COUNT FOR ( 性别="女")=.T. TO X SUM FOR ( 性别<>"男")=.T. TO X SUM FOR 性别="女"
2、; TO X 2、在已打开的表中,要永久删除当前记录位置开始的 10 条记录,可用_ 先执行 DELETE NEXT 10 命令,后用 PACK 命令 先执行 DELETE RECORD 10 命令,后用 PACK 命令 先执行 DELETE FOR RECORD> 10 命令,后用 PACK命令 ZAP NEXT 10 3、按数值型字段“总分”进行索引,使其按降序排列的命令是_ INDEX ON -总分 TO WP INDEX ON 总分/A TO WP INDEX ON 总分 TO WP INDEX ON 总分/D TO WP 4、下列操作后,不改变表记录指针的命令是_ RECALL
3、 LIST SUM REPL ALL 5、按照数据库的数据模型分类,VFP 属于_ 层次型 关系型 网状型 混合型 6、函数 LEN(SPACE(5)-SPACE(1)的返回值是_ 错误信息 17 6 4 7、某表文件中有日期型字段“出生日期” ,设 N='01/01/80',下列命令正确的是_ LOCATE FOR 出生日期='01/01/80' LOCATE FOR 出生日期=&N LOCATE FOR DTOC(出生日期)=N LOCATE FOR DTOC(出生日期)=CTOD(N) 8、 从表customer中提取所有记录生成查询, 并将查询结
4、果存放于表MyCursor的SQL命令为_ SELECT * FROM customer INTO CURSOR MyCursor SELECT * FROM customer INTO TABLE MyCursor SELECT ALL FROM customer INTO TABLE MyCursor CREATE SQL VIEWMyCursor ASSELECT * FROM customer 9、下列概念中,正确的是_ 在一个工作区中只能打开一个表文件,打开新的表文件后,原来所打开的表文件就自动关闭 一个表文件可以在不同的工作区同时打开 一个工作区中可以同时打开多个表文件 一个表文件
5、可以在不同的工作区同时打开,且一个工作区中可以同时打开多个表 10、将 2009年国庆节的日期送入内存变量 ND 的方法是_ ND=DTOC("10/01/09") ND=CTOD("10/01/09") STORE DATE()TO ND STORE 10/01/09 TO ND 11、 表文件 DD.DBF 有 100 条记录, 当前记录号是 10, 执行 DISPLAY ALL 命令后, 记录指针向的记录号是_ _ 100 10 1 101 12、执行命令:ACCEPT "请输入出生日期:" TO MDATE 时,如果通过键盘输
6、入 CTOD("01/01/69"),则 MDATE 的 值应当是_ CTOD("01/01/69") "01/01/69" 01/01/69 拒绝接受,MDATE 不赋值 13、在表结构中,逻辑型、日期型、备注型字段的宽度分别固定为_ 3,8,4 1,6,4 1,8,任意 1,8,4 14、表与相应索引文件已经打开,内存变量 XM="李春",执行时会产生逻辑错误的命令是_ LOCATE FOR 姓名=XM FIND &XM SEEK XM LOCATE FOR 姓名=&XM 15、以下命令中正确的
7、是_ STORE 8 TO X,Y STORE 8,9 TO X,Y X=8,Y=9 X=Y=8 16、在非嵌套程序结构中,可以使用 LOOP 和 EXIT 语句的基本程序结构是_ TEXT-ENDTEXT DO WHILE-ENDDO IF-ENDIF DO CASE-ENDCASE 17、下面可使程序单步执行的命令是_ SET STEP ON SET ESCAPE ON SET DEBUG ON SET STEP OFF 18、如果想从字符串"成都市"中取出汉字"都",应该用函数_ SUBSTR("成都市",2,2) SUBSTR
8、("成都市",2,1) SUBSTR("成都市",3,1) SUBSTR("成都市",3,2) 19、若使用 REPLACE 命令时,其范围子句为 ALL或 REST,则执行该命令后,记录指针指向_ _ 首记录 末记录 首记录的前面 末记录的后面 20、若要恢复用 DELETE 命令删除的若干记录,应该_ 用 RECALL命令 立即按ESC键 用 RELEASE 命令 用 FOUND 命令 21、执行命令 STORE CTOD('03/09/94') TO A 后,变量 A 的类型为_ 日期型 数值型 备注型 字符型
9、22、在 Visual FoxPro 中,数据环境指定义表单或表单集时使用的_ 数据 数据库 数据源 数据项 23、"电子科技大学"这六个汉字作为字符串常量,在VFP 中,可表示为_ 电子科技大学 (电子科技大学) 电子科技大学 "电子科技大学" 24、在 VFP中,INPUT,APPEND,WAIT 三条命令中可以接受字符的命令是_ 只有 ACCEPT 只有 ACCEPT 和 WAIT 都可以 只有 WAIT 25、下列 VFP 表达式运算结果为日期型的是_ 04/05/97-2 CTOD('04/05/97') - DATE( ) C
10、TOD('04/05/97')-3 DATE( )"04/05/97" 26、职工工资数据库文件按基本工资字段升序索引后,再执行 GO TOP 命令,此时当前记录号是_ _ 1 基本工资最少的记录号 0 基本工资最多的记录号 27、 当前数据库文件有20条记录, 当前记录号是10。 执行命令LIST REST以后, 当前记录号是_ 10 20 21 1 28、对学生成绩数据库文件按总分/N/6.2 降序、姓名/C/8 升序索引。应当使用命令_ INDEX TO ABC ON 总分,姓名 INDEX TO ABC ON -总分,姓名 INDEX TO ABC
11、ON STR(-总分,5,1)+姓名 INDEX TO ABC ON STR(1000-总分) +姓名 29、把当前数据库文件中"性别"字段的值全部清除,但仍保留该字段,应当使用命令_ MODIFY STRUCTURE DELETE REPLACE ZAP 30、命令 SELECT 0 的功能是_ 选择区号最小的空闲工作区 选择区号最大的空闲工作区 选择当前工作区的区号加 1的工作区 随机选择一个工作区的区号 二、判断题(正确的划,错误的划×,每小题1 分,共 10 分) ( × )1、对象具有属性,而属性只能在设计阶段设置。 ( × )2、一
12、条命令可分几行写,在行结束处用“: ”表示一行未完,转入下一行。 ()3、建立自由表分两步:定义表结构和输入数据。 ()4、表间的关系分三种:一对一关系、一对多关系和多对多关系。 ()5、若要使用多个表,就要使用多个工作区。 ()6、在应用程序中可以通过使用该工作区的表的别名来标识工作区。 ()7、报表包括两个基本组成部分:数据源和布局。 ()8、视图与查询相类似的地方是:可以用来从一个或多个相关联的表中提取有用信息。 ()9、视图与表相类似的地方是:可以用来更新其中的信息,并将更新结果永久保存在磁盘上。 ()10、一个视图在使用时,将作为临时表在自己的工作区中打开。 三、简答题(每小题5 分
13、,共10 分) 1、FOR 条件和 WHILE条件有何区别? 答:当 FOR和 WHILE在同一条命令语句中使用时,系统规定 WHILE 子句优先。这两种子句的差别是:FOR子句能 在整个数据表文件中筛选出符合条件的记录,而 WHILE 子句从当前记录开始顺序查找出满足条件的记录,一旦发 现下面有一条记录不满足条件,就终止寻找。 2、GO TOP和 GO 1 在什么情况下其作用相同?在什么情况下不同? 答:(1)当表文件中有记录且没有主控索引时,GO TOP 和 GO 1 是等价的。 (2)GO TOP和 GO 1 作用不同时的情况如下: 如果当前文件没有记录,执行 GO TOP,系统不会出错
14、,而执行 GO 1 系统将报告记录越界。这时 RECNO()的值 仍为 1,而 RECCOUNT()=0。 如果当前数据表文件有记录且有主控索引, 执行 GO TOP, 系统将当前记录指针定位在主控索引的第一条记录上; 而执行 GO 1系统将当前记录指针绝对定位在数据表文件的第一条记录上。 四、程序填空题(请在横线上填入合适的语句,将程序补充完整。每小题5 分,共15 分) 1、SET TALK OFF ACCEPT "输入表名:" TO KM USE &KM3 *显示最前面5 条记录 _ DISP NEXT 5_ WAIT GO BOTTOM *显示最后 4条记录
15、 SKIP 3 DISP NEXT 4 USE 2、有 12 个结构完全相同的表WY01,WY02,.WY11,WY12,下列程序完成的功能是:顺序打开每一个表并浏览之. SET TALK OFF G=1 DO WHILE G<13 DO CASE CASE G<10 GW='WY0'+STR(G,1) CASE G>=10 GW='WY'+ STR(G,2) ENDCASE USE &GW BROW _G=G+1_ USE ENDDO RETU 3、对 TEACHER.DBF 中的每条记录的 SALARY 字段作如下变化:若 SALA
16、RY>=3000,则上浮 3%,若 SALARY<3000,则 上浮 6% USE TEACHER SCAN IF salary >= 3000 REPLACE salary WITH salary * 1.03 ELSE _ REPLACE salary WITH salary * 1.06_ ENDIF ENDSCAN USE 五、程序分析题(请将程序运行后的输出结果写在横线上。每小题 5 分,共 15 分) 1、* a.prg s=0 FOR i=1 TO 5 s=s+i ENDFOR ?"s=",s 输出结果:_s=15_ 2、CLEAR STOR
17、E 2 TO I,C,T DO WHILE I<=4 DO PR ?"F("+STR(I,1)+")="+STR(C,2) I=I+1 ENDDO ?"T="+STR(T,2) RETURN PROCEDURE PR C=C*2 T=T+C RETURN 输出结果:_ 答:F(2)=4 F(3)=8 F(4)=16 T=30 3、i=1 DO WHILE i<10 i=i+2 ENDDO ?i 输出结果:_11_ 六、编程题(每小题10 分,共 20 分) 1、编程在屏幕上显示“九九”乘法口诀表。 SET TALK OFF
18、 CLEAR FOR I=1 TO 9FOR J=1 TO I K=I*J S=STR(K,2) ?STR(I,1)+"X"+STR(J,1)+"="+S+" " ENDFOR ? ENDFOR SET TALK ON 2、逐条显示体检表中性别为“男”的所有记录。 set talk off clear use 体检表 do while .not. eof() if 性别="男" ?"*" display endif skip enddo use set talk on returnseveral group number, then with b ± a, =c,c is is methyl b two vertical box between of accurate size. Per-23 measurement, such as proceeds of c values are equal and equal to the design value, then the vertical installation accu
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
评论
0/150
提交评论