湘潭大学VF试题

试卷编号:8257

-、填空共5题（共计10分）

第1题（2.0分）题号:1324

数据模型是用来描述数据库的结构和语义的,数据模型有概念数据模型和结构数据模型两类,E-R模型是

【1】模型.答案：概念数据

第2题（2.0分）题号:1530

在SQL中，用［1］命令向表中输入数据，用SELECT命令检查和查询表中的内容.答案：INSERT

第3题（2.0分）题号:1132

表文件的扩展名是【1】.答案：.dbf

第4题（2.0分）题号:1234

每个类都可以【1】出许多具有最基本方法和数据的对象,然后用户才能通过调用对象本身的方法操纵数据

运行.答案：实例化

第5题（2.0分）题号:1299

视图可以在数据库设计器中打开，也可以用use命令打开，但在使用use命令打开视图之前，必须打开包含该

视图的【1］.答案：数据库

二、判断共9题（共计9分）

第1题（1.0分）题号:1053

用ZAP命令可以删除表文件.答案：N

第2题（1.0分）题号:1094

主索引只能存放在结构复合索引文件中.答案：Y

第3题（1.0分）题号:971

在分支选择结构提供的两种选择中，有并且只有•种选择被执行.答案：Y

第4题（1.0分）题号:607

备注型字段用于存放超过256个字符的文本.答案：N

第5题（1.0分）题号:1076

在Record菜单中选择Pack项，可删除当前数据库中所有记录.答案：N

第6题（1.0分）题号:1085

在VisualFoxPro中引用数组时，每一个数组在内存中占用二个存储单元,答案：N

第7题（1.0分）题号:1000

表示满足第二个汉字是"红"的所有人的姓名是％红_.答案：N

第8题（1.0分）题号:1027

设表文件中有8条记录，且已打开，当BOF（）为真时,recno（）的返回值为1.答案：Y

第9题（1.0分）题号:1112

生成器（Builder）可以独立使用.答案：N

三、单项选择共10题（共计10分）

第1题（1.0分）题号:4002

顺序执行下列命令后，最后一条命令显示结果是（）.

USECHJ

GO5

SKIP-2

?RECNO（）

A:3B:4C:5D:7答案：A

第2题（1.0分）题号:3835

数据表中有30个记录，如果当前记录为第3条记录时,把记录指针向下移动2个记录，测试当前记录号函数

RECNO()的值是0.

A:3B:2C:5D:4答案：C

第3题(1.0分)题号:3076

seek()函数返回的值为()型.

A:字符B:数值C:日期D:逻辑答案：D

第4题(1.0分)题号:3066

DTOC({98/09/28})的值应为().

A:1998年9月28日B:98/09/28C:"98/09/28"D:"98-09-28"答案：C

第5题(1.0分)题号:3392

VisualFoxPro中的参照完整性包括().

A:更新规则B:删除规则C:插入规则D:以上答案均正确答案：D

第6题(1.0分)题号:3330

要存储员工上下班打卡的日期和时间,应采用哪种数据类型的字段().

A:字符类型B:日期类型C:日期时间类型D:备注类型答案：C

第7题(1.0分)题号:3345

拥有焦点的控件对象对应于表单的()属性.

A:ParentB:ControlsC:ActiveControlD:This答案：c

第8题(1.0分)题号:3073

Print方法的作用是在0对象上打印一个字符串.

A:TextB:LabelC:FormD:EditBox答案：C

第9题(1.0分)题号:3150

决定微调控件最大值的属性是().

A:KeyboardhighvalueB:ValueC:KeyboardlowvalueD:Interval答案：A

第10题(1.0分)题号:3332

一般情况下，运行表单时，在产生了表单对象后，将调用表单对象的()方法显示表单.

A:ReleaseB:RefreshC:SetFocusD:Show答案：D

四、多项选择共5题(共计10分)

第1题(2.0分)题号:347

下面关于VisualFoxPro数组的叙述中，正确的是().

A:用DIMENSION和DECLARE都可以定义数组B:VisualFoxPro只支持一维数组和二维数组

C:一个数组中各个数组元素必须是同一种数据类型D:新定义数组的各个数组元素初值为.F.答案：ABD

第3题(2.0分)题号:253

VisualFoxpro中使用了0等几种变量形式.

A:字段变量B:数组变量C:系统变量D:内存变量答案：ABCD

第4题(2.0分)题号:342

命令文件中可以实现单击一键输入一个字符的命令或函数有0.

A:waitB:inputC:inkey()D:@x,xgetVERpict'x'答案：ACD

第5题(2.0分)题号:338

打开VisualFoxPro”项目管理器"的"文档"(Docs)选项卡，其中包含的文件类型有

A:表单(Form)文件B:报表(Report)文件C:标签(Label)文件D:程序(PRG)文件答案：ABC

五、程序填空共3题(共计15分)

第1题(5.0分)题号:793

*功能:列出XSDB.DBF数据表中法律系学生记录，将结果显示输出。

SETTALKOFF

DOWHILE,T.

IF系别="法律”

DISP

ENDIF

***********SP/\CE**********

[?1

IFEOF（）

***********SPACE**********

[?]

ENDIF

ENDDO

USE

SETTALKON

RETURN

答案：=====（答案1）=====USEXSDB

=======（答案2）=======SKIP

=========^========SKIP1

=======（答案3）=======EXIT

第2题（5.0分）题号:805

*功能：显示所有100以内的6的倍数的数，并求这些数的和。

SETTALKOFF

1=1

***********SP/\CE**********

[?1

DOWHILEI<=100

***********SPACE**********

IFMOD（[?]）=0

?I

S=S+I

***********SPACE**********

[?]

1=1+1

ENDDO

9"<?="&

SETTALKON

RETURN

答案：=======（答案l）=======S=0

=======（答案2）=======I,6

======（答案3）=======ENDIF

=========sg=========ENDI

六、程序改错共3题（共计15分）

第2题（5.0分）题号:827

*题目:已有的一个合同管理数据库文件HTGL.DBF,其中包括合同号、订货单位、供货单位、订货数量和

单价等字段。给定程序MODI1.PRG的功能是分别统计不同的订货单位数和不同的供货单位数以及所有订

货的总金额，并将结果填写到TJ.DBF数据库文件中。

SETTALKOFF

SETSAFETYOFF

USEHTGL

***********FOUND**********

INDEXTOTMP1ON订货单位

COUNTTOAA

SETINDEXTO

***********FOUND**********

INDEXTOTMP2ON供货单位

COUNTTOBB

SETINDEXTO

***********FOUND**********

COUNT订货数量TOCC

USETJ

LOCATEFOR统计项目="订货单位数"

REPLACE数目WITHAA

LOCATEFOR统计项目="供货单位数"

REPLACE数目WITHBB

LOCATEFOR统计项目="订货总金额”

REPLACE数目WITHCC

LIST

CLOSEDATA

SETTALKON

RETURN

答案：=======（答案1）=======INDEUNIQTOTMP1ON订货单位

========@=========INDETOTMP1ON订货单位UNIQ

=========^=========INDEON订货单位TOTMP1UNIQ

=======（答案2）=======INDEUNIQTOTMP2ON供货单位

=========i^=========INDETOTMP2ON供货单位UNIQ

=========或=========1M£ON供货单位TOTMP2UNIQ

=======（答案3）=======SUMALL订货数量*单价TOCC

=========^=========SUM订货数量*单价TOCC

=========^=========SUM单价*订货数量TOCC

=========^========SUMALL单价*订货数量TOCC

七、程序设计共2题（共计10分）

第1题（5.0分）题号:700

*题目：编程判断一个整数w的各位数字平方之和能否被5整除，可以被5整除则返回1,否则返回0。将

结果存入变量OUT中。

SETTALKON

SETLOGERRORSON

?”输入一个整数：w=39"

OUT=-1

w=39

**********End**********

DOYZJWITHOUT

SETLOGERRORSOFF

SETTALKOFF

答案：

s=0

dowhilew>0

s=s+(w%10)*(w%10)

w=int(w/10)

enddo

ifs%5=0

out=l

else

out=0

endif

?out

第2题（5.0分）题号:684

*题目：利用循环程序输出图形:

*并将输出第3行存入变量S中

SETTALKOFF

SETLOGERRORSON

S=',H

**********End**********

DOYZJ14WITHS

SETTALKON

答案：

FORN=1TO5

IFN=1ORN=5

FORM=1TO7

99

ENDFOR

ELSE

FORM=1TO5-N

99

ENDFOR

??SPACE（2*N-3）

FORM=1TO5-N

97

ENDFOR

ENDIF

ENDFOR

S=”****3

八、VF窗体设计共2题（共计21分）

第2题（10.0分）题号:9

编辑状态(如图1)

运行状态(如图2)

制作如图所示表单。

设置：

1、设置表单名称为“Forml”，标题为“文字”。

2、设置文本框名称为“Textl”。

3、设置复选框(Checkl)的标题为“斜体”。

设置复选框(Check2)的标题为“粗体”。

4、设置按钮(Command1)的标题为"清除”。

要求：

1、表单标题为“文字”，表单内控件如图中所示。

(2)选中“斜体”复选框时，文字变为斜体，选中“粗体”复选框时，文字为粗体。

⑶单击“清除”按钮时，清除文本框中的文字。

(4)表单整体效果美观，比例合适。

基本属性：

1、FORMl.HEIGHT=130

2、FORM1,LEFT=62

3、FORM1.TOP=27

4、FORMl.WIDTH=130

5、TEXT1.FONTSIZE=14

一、填空共5题(共计10分)

第1题(2.0分)题号:1161

当表单的Windowstate取值为1时,代表该表单窗口在运行是为【1】状态.

答案：最小化

第2题(2.0分)题号:1444

要使表单中表格的数据只能看不能改,应将该表格的【1】属性设置为真(.T)

答案：ReadOnly

第3题(2.0分)题号:1594

执行查询的命令是【1】.

答案：DO

第4题（2.0分）题号:1543

在VisualFoxpro中,QUIT命令用来【1】应用程序.

答案：退出.

第5题（20分）题号:1287

使用“快速报表"创建报表，仅需【1】和设定报表布局.

答案：

选取字段

二、判断共9题（共计9分）

第1题（1.0分）题号:621

如果我们根据一个逻辑型字段来创建一个递增次序的索引，则

逻辑真值工将排列在前，而逻辑非.F.将排列在后.答案：N

第2题（1.0分）题号:974

执行?MOD（3,-9）后的结果为-3.答案：N

第3题（1.0分）题号:1062

在VisualFoxPro中,当使用命令:replace简历with"1980年毕业

于北京大学"additive后，是将""1980年毕业于北京大学”"

追加到原来简历的后面.答案：Y

第4题（1.0分）题号:618

函数值会因函数名和参数的不同而不同.答案：Y

第5题（1.0分）题号:982

VisualFoxPro的字段变量是数据库中的字段，字段变量名必须用

修改数据库结构方法修改.答案：Y

第6题（1.0分）题号:1036

数据是信息的表现形式.是对原始信息进行分析、加工、处理后

得到的有价值、有意义的信息.答案：Y

第7题（1.0分）题号:1021

您可以为一个表创建多个索引文件.答案：Y

第8题（1.0分）题号:603

PARAMETERS后跟形式参数，该命令只能放在被调过程的第一条语句中.答案：Y

第9题（1.0分）题号:1006

打开一个表后，在命令窗口中执行APPENDBLANK的结果是在表

的结尾追加一条空记录.答案：Y

三、单项选择共10题（共计10分）

第1题（1.0分）题号:3866

要想在一个打开的数据表中删除某些记录，应先后选用的两个命令是（）.

A:DELETE、RECALLB:DELETE>PACK

CDELETE、ZAPD:PACK、DELETE答案：B

第2题（1.0分）题号:3869

第3题（1.0分）题号:3076

seek（）函数返回的值为（）■■

第4题（1.0分）题号:3088

VisualFoxPro是一种（）.

A:数据库管理系统B:数据库C:文件管理系统D:语言处理程序答案：A

第5题（1.0分）题号:3883

仃图,数据袤按“书名“、“作者"复合索弓I.索引标识叮，段名相同.执行以，命令：

setordertolagf）8

seek'巴金'

现在要使指针指向巴金的第二部著作，应用命令（）.

A:SKIPBcontinueeek'lll个2'D:「ind巴金答案：A

第6题（1.0分）题号:3393

VisualFoxPro中多表关联参照完整性不包括0.

A:更新规则B:插入规则C:查询规则D:删除规则答案：C

第7题（1.0分）题号:3789

■旬设计器中的选项卡依次为（）.

...'

B:'♦段、联接、排序依据.分组依据、杂项

第8题（1.0分）题号:3331

要想执行设置，快捷键的某命令按钮的Click，件,可以有（）种方，

A:1B:2C:3D:4答案：D

第9题（1.0分）题号:3860

四、多项选择共5题（共计10分）

第1题（2.0分）题号:346

数据在主程序与子程序或过程中的传递方式有0.

A:形式参数B:全局变量C:私有变量D:局部变量答案：AB

第2题（2.0分）题号:253

VisualFoxpro中使用了0等几种变量形式.

A:字段变量B:数组变量C:系统变量D:内存变量答案：ABCD

第3题（2.0分）题号:339

关于程序（命令）文件，卜一列说法正确的有（）.

A:程序文件不再是逐条发出和执行，而是“批处理”方式发出和执行

B:程序文件是用户和数据之间的一种软件接口

C:依赖程序文件可以保证数据管理的高效率

D:程序文件不能相互调用答案：ABC

第4题（2.0分）题号:336

在下面的VisualFoxPro表达式中，正确的是0.

A:{人2002-05-0110:10:10AM}-10B:{A2002-05-01）-DATE（）

C:{A2002-05-01}+DATE（）D:{A2002-05-01）+1000答案：ABD

第5题（2.0分）题号:345

使用USE〈表文件名〉命令打开表文件时，能同时自动打开的相关文件有（）.

A:备注文件B:独立复合索引文件C:结构复合索引文件D:内存变量文件答案：AC

五、程序填空共3题（共计15分）

第1题（5.0分）题号:792

*【程序填空】

*功能:下面程序根据XSDB.DBF数据表中的计算机和英语成绩对奖

*学金做相应调整：双科90分以上（包括90）的每人增加30元；

*双科75分以上（包括75）的每人增加20元；其他人增加10元。

*请在［】处添上适当的内容，使程序完整。

SETTALKOFF

USEXSDB

***********SP/\CE**********

DOWHILE[noteof()]

DOCASE

CASE计算机>=90.AND.英语>=90

REPLACE奖学金WITH奖学金+30

CASE计算机>=75.AND.英语>=75

REPLACE奖学金WITH奖学金+20

***********SP/\CE**********

[otherwise]

REPLACE奖学金WITH奖学金+10

ENDCASE

***********SP/\CE**********

[skip]

ENDDO

USE

SETTALKON

RETURN

答案：=======(答案1)======.not.eof()

=========或=========noteof()

=========ug=========!eof()

=========或=========eof()<>.T.

=========或=========eof()#.T.

=========<=========eof()!=.T.

=========或========noteof()=.T.

=======(答案2)=======OTHERWISE

=========或========

CASE.NOT.(计算机>=90.AND.英语>=90).OR.NOT.(计算机>=75.AND.英语>=75)

=======(答案3)=======SKIP

=========或=========SKIP1

第2题（5.0分）题号:847

*【程序填空】

*功能：下面程序的功能是不用第三个变量，实现两个数的对调操作

*请在［】处添上适当的内容，使程序完整。

*

SETTALKOFF

clear

input"a="toa

input"b="tob

***********SPACE**********

a=a+[b]

***********SPACE**********

b=[a]-b

a=[a-b]

?"a=",a,'b=',b

settalkon

canc

答案：=======（答案]）=======b

=======（答案2）=======a

=======（答案3）=======a-b

六、程序改错共3题（共计15分）

第2题（5.0分）题号:821

*【程序改错】

*题目:已有数据库stuck.dbf,包括商品号、商品名、单价和数量等

*字段。请考生编写程序modil.PRG,其功能是给该数据库增加

*一个总额（N,10.2）字段，并填入数据，其值为数量与单价之

*乘积，最后把结果复制到stockl.dbf文件中。

SETTALKOFF

CLOSEDATABASE

CLEAR

USESTuCK

***********FOUND**********

COPYSTRUCTURETOSTO

USESTO

***********FOUND**********

APPEN

REPLFIELD.NAMEWITH”总金额二FIELD」YPEWITH"N'\FIELD_LENWITH10,FIELD_DECWITH

2

CREATESTOCK1FROMSTO

USESTOCK1

***********FOUND**********

APPENDBLANK

REPLALL总金额WITH数量*单价

LIST

USE

SETTALKON

RETU

答案：=======（答案1）=======COPYSTRUCTURETOSTOEXTENDED

=======（答案2）=======appeblank

=====（答案3）=======APPEFROMSTUCK

第3题（5.0分）题号:829

，【程序改错】

*题目:已有两个数据库文件ZC.DBF和ZGDBFo给定程序MODI1.PRG

*的功能是：将ZC.DBF和ZG.DBF两个数据库文件的相应记录连

*在一起存入新数据库文件JJ.DBF中，对该数据库文件按职称

*分类汇总实发工资和奖金，再将汇总后的结果复制到ABC.DBF

*数据库文件中，并使该文件只包含职称、奖金和实发工资三

*个字段。

SETTALKOFF

SETSAFETYOFF

SELECT1

USEZG

SELECT2

USEZC

***********FOUND**********

JOINWITHATOJJ

USEJJ

***********F（）UND**********

INDEXON职工号TOZCHZ

TOTALON职称TODDDFIELDS实发工资，奖金

USEDDD

***********FOUND**********

COPYTOABCFOR职称，奖金，实发工资

USEABC

LIST

CLOSEDATABASE

SETTALKON

RETURN

答案：=======（答案］）=======JOINWITHATOJJFOR职工号=A-＞职工号

========或========10我WITHZGTOJJFOR职工号=ZG-＞职工号

=========或=========22WITHATOJJFOR职工号==A

=======（答案2）=======INDEON职称TOZCHZ

=======（答案3）=======COPYTOABCFIEL职称，奖金，实发工资

=========或=========COPYFIEL职称，奖金，实发工资TOABC

七、程序设计共2题（共计10分）

第1题（5.0分）题号:731

*【程序设计】

题目：编程求序列s=2/l-3/2+5/3-8/5+13/8-21/13+34/21的值。

要求使用for...endfor语句来完成。

将结果存入变量OUT中。

请按照题目要求，在卜一面编写程序代码。

SETTALKON

SETLOGERRORSON

OUT=-1

***¥******j)rooram**********

**********End**********

DOYZJWITHOUT

SETLOGERRORSOFF

SETTALKOFF

答案：

fl=l

f2=l

s=0

fori=lto7

f3=fl+f2

fl=f2

f2=f3

s=s+((-l)A(i+l))*f2/fl

endf

out=s

?out

第2题(5.0分)题号:682

*【程序设计】

*题目：从键盘输入一个数作为圆的半径，如果该数字大于0,则

*通过子程序输出圆的面积，如果该数字小于等于0,则输

*出"不能作为圆的半径"。(PI=3.14)

*将结果存入变量OUT中.

*请按照题目要求，在下面编写程序代码。

SETTALKOFF

SETLOGERRORSON

INPUTTOA

SETTALKON

?FUN(A)

YZJ()

RETURN

FUNCTIONFUN(R)

OUT=-1

**********^Prooram

********************

RETURNOUT

FUNCTIONYZJ()

USEIN

LOCAFORTIHAO=11

IFFOUND()

OUT=FUN(N1)

DOYZJ11WITHOUT

ELSE

?”试题输入文件已损坏，请重新配置考试环境”

ENDIF

RETURN

答案：

IFR>0

OUT=R*R*3.14

ELSE

?”不能作为圆的半径”

ENDIF

八、VF窗体设计共2题（共计21分）

第1题（11.0分）题号:99

一、基本操作题

1、在考生文件夹下打开数据库'课本'，将自由表shu添加到数据库'课本'中。

2、将shu中的记录拷贝到新表ben中。

3、使用报表向导建立报表my。报表显示shu中的全部字段，

无分组记录，样式为‘简报式'，列数为2,方向为‘横向，

按'价格'升序排序，报表标题为'书籍浏览'，并保存到考生目录下，文件

名称为shu（＞

二、简单应用题

1、修改表单Forml,标题为'系统时间工完成如下要求：

表单上创建一命令按钮，标题为'显示日期'，名称为:'CommandI7；

•个标签控件（Labell）。单击命令按钮，在标签上显示当前系统时间，

显示格式为:yyyy年m月dd日。

如果当前月份为一月到九月，如3月，则显示为‘3月'，不显示为‘03月。

显示不例：如果系统时间为2004-04-08,则标签显示为'2004年4月08日」

第2题（10.0分）题号:55

运行状态（如图1）

编辑状态（如图2）

制作如图所示表单。

设置：

1、设置表单名称为“Forml”，标题为“Form】"。

2、在窗体内添加3个Label控件，名称分别为：Label1,Label2、Label3。

添加3个TextBox控件，名称分别为：Textl、Text2、Text3。

添力口1个CommandButton控件，名称为：Command11.

3、设置Label1的标签内容为“输入一个数：”，字体为：宋体、12号字。

设置Label2的标签内容为“该数的平方：”，字体为：宋体、12号字。

设置Label3的标签内容为“该数的立方：”，字体为：宋体、12号字。

一、填空共5题（共计10分）

第1题（2.0分）题号:1315

数据库文件是由.dbc、.det（数据库备注文件）和［I］三个文件所构成.答案：.dcx（数据库索引

文件）

第2题（2.0分）题号:1524

在SQL中，空值用保留字表示【1】，非空值用保留字NOTNULL表示.答案：NULL

第3题（2.0分）题号:1172

定义一个标签后，会产生的文件有标签文件［1］和标签备注文件frt.答案：frx

第4题（2.0分）题号:1136

菜单设计器的两个功能是为顶层表单设计［1］和通过定制VisualFoxpro系统菜单建立应用程序的卜拉式

菜单.答案：下拉式菜单

第5题（2.0分）题号:1496

一个数据表有8条记录，当EOF（）为真时，则当前记录号为【1】.答案：9

二、判断共9题（共计9分）

第1题（1.0分）题号:1088

在自由表中也可以建立主索引.答案：N

第2题（1.0分）题号:1004

创建表文件时自动产生一个与表文件同名，扩展名为.FTP的备注文件.答案：N.fpt

第3题（1.0分）题号:1031

数据库表可以拥有主索引.答案：Y（自由表不能有主索引，数据库中的每一个表只能有一个主索引）

第4题（1.0分）题号:1069

在VisualFoxPro中，修改结构操作可以选菜单Database再选Setep项，出现窗口再选Structure框中的Modify.

答案：Y

第5题（1.0分）题号:1104

setexacton只对字符串运算起作用.答案：Y

第6题（1.0分）题号:1057

在VisualFoxPro中,copy命令不但可以复制数据库、数据库结构和结构数据库,还可复制各种文件.

答案：Y

第7题（1.0分）题号:969

在程序中未作过任何说明的内存变量都被看成局部变量.答案：Y

第8题（1.0分）题号:607__________________________________________

备注型字段用于存放超过256个字符的文本.答案：N（最多254个字符）

第9题（1.0分）题号:610

表达式?NOT3>3的返回值是.F.。答案：N

三、单项选择共10题（共计10分）

第1题（1.0分）题号:3153

扩展名为.DBC的文件表示（）.

A:表文件B:备份文件C:数据库文件D:项目文件答案：C

第2题（1.0分）题号:3297

下列常量中，只占用内存空间1个字节的是（）.

A:数值型常量（8个字节）B:字符型常量（一个字符占1个字节，最多254个字节）C:日期型常量（8

个字节）D:逻辑型常量答案：D

第3题（1.0分）题号:3246_____________________________

设有变量pi=3.1415926,执行命令?ROUND（pi,3）的显示结果为（）.

A:3.141B:3.142C:3.140D:3.000答案：B

第4题（1.0分）题号:3063

Click事件在0时引发.

A:用鼠标单击对象B:用鼠标双击对象C:表单对象建立之前D:用鼠标右键单击对象答案：A

第5题（1.0分）题号:3282

使用数据库技术进行人事档案管理是属于计算机的（）.

A:科学计算应用B:过程控制应用C:数据处理应用D:辅助工程应用答案：C

第6题（1.0分）题号:3672________________________

下列符号中，除（）外均可作为VisualFoxPro的内存变量名.

A:男B:'男'C:X3D:FIF答案：B（内存变量名以字母或卜划线开头）

第7题（1.0分）题号:3067

Grid的集合属性和计数属性是（）.

A:Columns和ColumnCountB:Forms和FormCount

C:Pages和PageCountD:Controls和ControlCount答案：A

第8题（1.0分）题号:3959

如果要将一个SDI菜单附加到一个表单中，则（）.

A:表单必须是SDI表单，并在表单的Load事件中调用菜单程序

B:表单必须是SDI表单，并在表单的Init事件中调用菜单程序

C:只要在表单的Load事件中调用菜单程序

D:只要在表单的Init事件中调用菜单程序答案：B

第9题（1.0分）题号:3307

下列命题正确的是（）.

A:关系代数语言和关系演算语言均为DDL语言

B:关系代数语言和关系演算语言均为DML语言

C:关系代数语言为DML语言，关系演算语言为DDL语言

D:关系代数语言为DDL语言，关系演算语言为DML语言答案：B

第10题（1.0分）题号:3116

当某控件对象获得焦点后又失去焦点，将依次激发（）事件.

A:WhenValidGotFocusLostFocusB:WhenGotFocusValidLostFocus

C:ValidGotFocusWhenLostFocusD:ValidWhenGotFocusLostFocus答案：B

四、多项选择共5题（共计10分）

第1题（2.0分）题号:254

以下表达式中，合法的是（）.

A:8-3=5B:[8]+[3]>10___________________

C:AT（"ad","xyadvanad"）-len（"adadad"）D:.not.（a=b）.and.a-b>0.or.b=0答案：ACD

第2题（2.0分）题号:250

VisualFoxpro的工作方式包括0.

A:命令方式B:菜单方式C:程序文件方式D:交互执行方式答案：ABCD

第3题（2.0分）题号:344

如果要在屏幕上直接看到查询结果，"查询去向"可以选择（）.

A:屏幕B:浏览C:临时表D:视图答案：AB

第4题（2.0分）题号:406

以下哪些是程序设计的基本结构（）.

A:分支B:选通C:循环D:顺序答案：ACD

第5题（2.0分）题号:346

数据在主程序与子程序或过程中的传递方式有（）.

A:形式参数B:全局变量C:私有变量D:局部变量答案：AB

五、程序填空共3题（共计15分）

第2题（5.0分）题号:810

*【程序填空】

*功能：从键盘输入一个表名“XSDA”，查找“姓名"为“刘洪"的记录。

*如果有该记录，则将该表结构及"姓名"为"刘洪”的记录一

*起复制成一个新表（表名为“A1”）；否则，仅复制表结构。

*（设，表中有固定字段"姓名"）。

*请在[】处添上适当的内容，使程序完整。

SETTALKOFF

ACCEPTTOA

USE&A

***********SPACE**********

[locate]FOR姓名="刘洪”

IFNOTEOF（）

***********SP/\CE**********

[copy]TOAlFOR姓名士'刘洪"

ELSE

***********SPACE**********

[copystructure]TOA1

ENDIF

USE

SETTALKON

RETURN

答案：=======（答案1）=======LOCATE

=========^=========LOCA

=======（答案2）=======COPY

=======（答案3）=======C0PYSTRUCTURE

=========或=========COPYSTRU

六、程序改错共3题（共计15分）

第1题（5.0分）题号:775

*【程序改错】

*题目：查找RSH.dbf中女职工的最高工资，并显示其姓名和工资。

*______________________________________

SETTALKOFF

USERSH

MGZ=0

DOWHILE.NOT.EOFO

***********FOUND**********

IF性别="女",andMGZv工资

MGZ=工资

MXM=姓名

ENDIF

***********FOUND**********

skip

ENDDO

?MXM,MGZ

USE

SETTALKON

RETU

答案：=======（答案I）=======IF性别="女”.and.MGZv工资

=========或=========中性别="女"andMGZv工资

=========x^=========IFMGZ＜工资.and.性别="女”

=========或=========IFMGZ＜工资and性别="女”

=========或=========中性别='女.and.MGZ＜工资

=========或========IF性别='女andMGZv工资

=========^=========IFMGZ＜工资.and.性别='女

=========^=========IFMGZ＜工资and性别=，女

=========或=========田性别=［女］.and.MGZ＜工资

=========或=========正性另1」=［女］andMGZ＜工资

=========或=========IFMGZ＜工资.and.性别=［女］

========@=========IFMGZ＜工资and性另归女］

=======（答案2）=======SKIP

========或=========＜10while!eof（）

第2题（5.0分）题号:768

*【程序改错】

*题目：从键盘输入一串汉字，将它逆向输出，并在每个汉字中

*间加一个"*"号。

*例如：输入”计算机考试"，应输出"试*考*机*算*计"

*

SETTALKOFF

ACCEPTTOA

**********F()UND**********

DON=2TOLEN(A)

**********FOUND**********

??SUBSTR(A,LEN(A)-N,2)

IFN#LEN(A)

**********FOUND**********

9

ENDIF

ENDFOR

SETTALKON

RETU

答案：=======(答案1)：======FORN=2TOLEN(A)STEP2

=======(答案2)======??SUBSTR(A,LEN(A)-N+1,2)

=========或========：??SUBS(A,LEN(A)-N+1,2)

=======(答案3)=====_99叫”

=========或========99,*»

=========或=========??[*]

第3题(5.0分)题号:796

【程序改错】

*题目:ZHGDBF是一个职工信息文件，其中包含编号(C5)、姓名

*(C8)、性别(C2)、政治面目(C4)、出生日期(D8)等字

段。性别用字符串"男"或"女’表示，政治面目用字符串“

党员“、"团员"或"群众"表示。此文件已按政治面目建立

了索引，索引文件名是ZHGIDX。

程序M0DI1.PRG功能是：显示输出所有政治面目为“群众"

的女职工的姓名和出生日期(每行输出,个职工的信息)

在屏幕上

*,

settalkoff

clear

***********FOUND**********

USEZHG

locafor政治面目="群众"

***********F(2)UND**********

DOWHILE!EOF()

IF性别二“女"

DISP姓名，出生日期

***********F()UND**********

ENDD

SKIP

ENDDO

USE

SETTALKON

RETU

答案：=====（答案1）=======USEZHGINDEXZHG

=@=========USEZHGINDEZHG

：（答案2）=======DOWHILE政治面目="群众”

==或=========口0WHIL政治面目="群众"

：（答案3）=======ENDIF

==5g=========ENDI

七、程序设计共2题（共计10分）

第1题（5.0分）题号:692

*【程序设计】

*题目：求1-200间的所有偶数的和，结果输入变量OUT中

*请按照题目要求，在下面编写程序代码。

*________________________________________

SETTALKOFF

SETLOGERRORSON

OUT=-1

¥¥********I^rooram**********

*************字******

DOYZJ24WITHOUT

SETTALKON

RETURN

答案：

S=0

FOR1=1TO200

IFI/2=INT（I/2）

S=S+I

ENDIF

ENDFOR

?S

OUT=S

第2题（5.0分）题号:707

*【程序设计】

*题目：编程判断整数x是否是同构数。若是同构数，结果返回1；

否则返回0o（x的值要求不大于100）

所谓“同构数”是指这样的数，这个数出现在它的平方数的右边。

例如：输入整数5,5的平方数是25,5是25中右.侧的数，所以5是

*同构数。

将结果存入变量OUT中。

请按照题目要求，在卜.面编写程序代码。

SETTALKON

SETLOGERRORSON

?”输入整数x=25进行判断”

x=25

OUT=-1

***¥******j)rooram**********

¥*************¥¥¥***

DOYZJWITHOUT

SETLOGERRORSOFF

SETTALKOFF

答案：

k=x*x

ifk%10=xork%100=x

out=l

else

out=0

endif

?out

八、VF窗体设计共2题（共计21分）

第1题（11.0分）题号:93

一、基本操作

1、为数据库数据库“Stsc”中的表“student”建立主索引，索引名称

和索引表达式均为“学号”；为“Score”建立两个普通索引，索引

名和索引表达式均为“学号”和“课程号”；为“Course”建立主索

弓I，索引名和索引表达式均为“课程号”。

2、建立表“student"、"score"、"course”之间的关联。

二、简单应用

1、在考生文件夹下有一个数据库stsc,其中有数据库表student、

score和course。利用SQL语句或查询设计器查询选修了"C++”

课程的学生的全部信息，并将结果按学号升序存放在cplus.dbf

文件中（表的结构同student,并在其后加入课程号和课程名字段）。

2、在考生文件夹下有一个数据库stsc,其中有数据库表student,

使用报表向导制作一个名为P1的报表，存放在考生文件夹下。

要求：选择student表中所有字段，报表样式为经营式；报表布局：

列数为1，方向为纵向，字段布局为列；排序字段选择学号（升序）;

报表标题为“学生基本情况一览表”。

第2题（10.0分）题号:13

编辑状态（如图1）

运行状态（如图2）

制作如图所示表单。

设置：

1、设置表单名称为“Forml”，标题为“计算机考试”。

2、设置标签（Labell）的标题为“学生”。

3、设置列表框的名称为“Listl”。

4、设置选项按钮组的名称为“Opliongroupl”。

设置选项按钮组中的按钮（Option1）的标题为“正常

设置选项按钮组中的按钮（Option2）的标题为“迟到”。

设置选项按钮组中的按钮（Option3）的标题为“早退

设置选项按钮组中的按钮（Option4）的标题为“旷课”。

5、设置命令按钮（Commandl）的标题为"退出"。

要求：

1、表单标题为“计算机考试”。

2、表单内所需控件如图中所示，列表框中有4个可选择项：“王峰”、“李宏峰”、

“刘洪”和“张凯”，列表框要有“移动按钮”。

3、选项组有4个单选按钮。

4、“退出”按钮要有关闭表单的功能。

5、表单整体效果美观，比例合适。

试卷编号：8251

一、填空共5题（共计10分）

第1题（2.0分）题号:1561

在VisualFoxPro中设计项目时，可以将程序文件作为主文件,程序文件的扩展名为【I].答案：prg或.prg

第2题（2.0分）题号:870

dimension定义的数组，其数组元素的初始值是11】类型.答案：逻辑

第3题（2.0分）题号:1210

控件的数据绑定是指将控件与某个【1】联系起来.答案：数据源

第4题（2.0分）题号:1550___________________________________

在VisualFoxPro中,浏览表记录的命令是【1】.答案：BROWSE

第5题（2.0分）题号口544

在VisualFoxpro中,程序文件的扩展名为【1】.答案：.prg或prg

二、判断共9题（共计9分）

第1题（1.0分）题号:614

常量是其值在程序的执行过程中可以改变的量.答案：N（变量）

第2题（1.0分）题号:1146

表单在运行过程中,其边框是不可调的.答案：N

第3题（1.0分）题号:1158

?LEFT（"程序设计”,2）的返回值是"程序答案：N

第4题（1.0分）题号:1101

PACK命令可以恢复已被逻辑删除的数据记录.答案：N（recall）

第5题（1.0分）题号:986

LOOP或EXIT语句不能单独使用，只能在循环体内使用.答案：Y

第6题（1.0分）题号:1109

查询文件是独立的，不影响原来的数据文件.答案：Y

第7题（1.0分）题号:1019

内存变量的值和数据类型都可以改变.答案：Y

第8题（1.0分）题号:1009

当指针指向首记录时,BOF（）函数为.T..答案：N

第9题（1.0分）题号:590

VisualFoxPro的日期型字段的长度为8位.答案：Y

三、单项选择共10题（共计10分）

第1题（1.0分）题号:3847________

下列命令中，修改库文件结构的命令是（）.

A:MODIFYFILEB:MODIFYCOMMANDC:MODIFYSTRUCTURED:CREATESTRUCTURE答案：C

第2题（1.0分）题号:3298

卜列方法中，不能退出VisualFoxPro的是（）.

A:单击“文件”菜单中的”关闭"命令B:单击"文件"菜单中的"退出”命令

C:单击窗口标题栏右端的"关闭"按钮D:按［Alt+F4］组合键答案：A

第3题（1.0分）题号:3063

Click事件在（）时引发.

A:用鼠标单击对象B:用鼠标双击对象C:表单对象建立之前D:用鼠标右键单击对象答案：A

第4题（1.0分）题号:3246

设有变量pi=3.1415926,执行命令?ROUND（pi,3）的显示结果为（）.

A:3.141B:3.I42C:3.140D:3.000答案：B

第5题（1.0分）题号:3151

可以链接或嵌入OLE对象的字段类型是0.

A:备注型字段B:通用型和备注型字段C:通用型字段D:任何类型的字段答案：C

第6题（1.0分）题号:3393_____________

VisualFoxPro中多表关联参照完整性不包括0.

A:更新规则B:插入规则C:查询规则D:删除规则答案：C

第7题（1.0分）题号:3951

建立事件循环的命令是（）.

A:BeginEventsB:ReadEventsC:ClearEventsD:EndEvents答案：B

第8题（1.0分）题号:3920

只有满足联接条件的记录才包含在查询结果中,这种联接称为（）.

A:内部联接B:左联接C:右联接D:外部联接答案：A

第9题（1.0分）题号:3852