数据库期末考试2010.06B答案

（2009 -2010  学年第 二 学期）

课程名称   数据库应用与开发        

考试班级 08421-4/08461-2/08491       

命题教师   刘多林               

答   案 [A或B]    B                    

考核形式[开、闭]       闭卷   

考试类型[考查、考试]    考试   

2010年6 月13 日

第一题  单项选择题（每小题1分 共10分）

1、A 2、B 3、D 4、D 5、A 

6、D 7、C 8、B 9、C 10、D 

第二题  填空题（每空1分  共10分）

1、.F.  2、．F．  3、5  4、7  5、101，1  6、memo(必须为小写)  7、142 

8、2024   9、交互式

第三题  简答题（每小题8分 共40分）

1、IF...ENDIF是两分支语句，在超过两个以上分支时，只能利用嵌套解决，适用于分支情况比较少的时候。                                             （4分）

        DO CASE...ENDCASE是多分支语句，可以将多个分支情况平行展开，适用于分支比较多的情况。                                                   （4分）

2、结构型复合索引的主文件名与表文件名同名，扩展名为CDX。          （3分）

结构型复合索引文件的打开与关闭是随数据表的状态的。              （3分）

它们都可以在一个索引文件中保存多个索引项。                      （2分） 

3、备注型和通用型字段都是保存在一个主文件名与表同名，扩展名为FPT的备注文件中，在表中对应位置只保存其数据在备注文件中的地址。                   （4分）

备注型适合保存大量的文本，而通用性适合保存声音、图片等特殊的数据。（4分）

4、类是概括了客观事物的基本特征以及外观的行为的模板。  （2分）

对象是现实世界中的个体或事物的抽象表示。               （2分）

类作为一个对象的整体定义而存在，类是对象的蓝图和框架，它包含了对象的特征和行为。类可视为一个产品模具、一个模块。对象则可视为一个窗口、一个按钮、一个菜单、甚至一个表单。类是对象的原型。            （4分）

5、“=”在Visual FoxPro中即可以做赋值命令又可以作为比较运算符，而“==”只有比较运算的功能，且只能对字符型数据比较。                     （2分）

都为比较时，当SET EXACT OFF时，“=”为非精确比较，“==”为精确比较，当SET EXACT ON时，都为精确比较。                                       （3分）

举例说明如下：

A=”abcd”

B=”abc”

? A=B      (SET EXACT OFF)  结果为  .T.

? A==B     (SET EXACT OFF)  结果为  .F.

? A=B      (SET EXACT ON)  结果为  .F.

? A==B     (SET EXACT ON)  结果为  .F.                    （3分）

第四题  命令题  （共20分）

1、USE DA

BROWSE FOR 性别>=”男”.AND.职称=“教授”

USE                                                      （3分）

2、USE DA

INDEX ON 编号 TAG TBH OF JSSY 

USE                                                      （3分）

3、USE DA

REPLACE ALL工资 WITH 工资*1.3 FOR 职称=“教授”

USE                                                      （3分）

4、USE GZ

AVERAGE 工资 TO GZ

USE                                                       （3分）

5、USE DA

CALCULATE MAX(年龄) TO NL

USE                                                       （3分）

第五题  程序题  （共25分）

1、Command1代码：

y=VAL(ALLTRIM(thisform.text1.value))

IF y%4=0.and.y%100<>0.or.y%400=0

      yy="今年是闰年"

ELSE

      yy="今年是平年"

ENDIF

 thisform.label1.caption=yy

m=VAL(ALLTRIM(thisform.text2.value))                   （4分）

DO case

CASE m<=3

      mm="一季度"

CASE m<=6

         mm="二季度"

CASE m<=9

         mm="三季度"

CASE m<=12

         mm="四季度"

    ENDCASE

    thisform.label2.caption=mm

  d=VAL(ALLTRIM(thisform.text3.value))                   （4分）

DO case

CASE d<=10

        dd="上旬"

CASE d<=20

        dd="中旬"

otherwise

        dd="下旬"

endcase

thisform.label3.caption=dd

w= ALLTRIM(thisform.text1.value)+”/”+ ALLTRIM(thisform.text2.value)+”/”+ ALLTRIM(thisform.text3.value

w=dow(ctod(w))

do case 

   case da=1

     ww=”日”

case da=2

     ww=”一”

case da=3

     ww=”二”

case da=4

     ww=”三”

case da=5

     ww=”四”

case da=6

     ww=”五”

otherwise

     ww=”六”

endcase

thisform.label4.caption=ww

    thisform.Refresh                             （3分）

Command2代码：

   Thisform.release                                 （2分）

2、SET TALK OFF

USE STU                                                     

A=“Y”                                                     

SCAN FOR Dno=“A01” WHILE UPPER（A）=“Y”              (2分)

DISPLAY                                                    

WAIT “是否继续显示下一条？Y/N” TO A                    （2分）   

ENDSCAN                                                     

USE                                                         （1分）

SET TALK ON