2010年4月重庆市计算机二级VF真题及答案Visual_FoxPro笔试试题及答案

重庆二级Visual Foxpro笔试试题（A卷）

（共100分）

一、单项选择题（每小题1分，共30分） 1．Visual Foxpro设置默认目录的命令是（ ） A）SET DEFAULT TO C）set date to A）数值型 A）0

B）SET RELATION TO <默认目录> D）set deleted to <默认目录> C）逻辑型

D）4

D）D2-M

D）2357 D）日期型

2．字段的宽度不是由系统自动给出的字段类型是（ ）

B）备注型

3．函数len(“ABCD”-“ABCD”)的值是（ ）

B）8

C）9

4．设D1和D2为日期型数据，M为整数，不能进行的运算是（ ） A）D1+D2 A）-2357

B）D1-D2 B）-2356.00

C）D1+M

5．函数 round(-2356.78,-2)的值是（ ）

C）-2400

6．下列表达式中，运算结果为.t.的是（ ） A）AT(“BB”,”ABCD”)=0 C）chr(ASC([8])) A）-20.60

B）”[重庆]”$”朝天门重庆商城” D）subs(“数据库技术”，7，4) C）-20.00

D）-41.00

7．执行？VAL（”-20.6*2”）命令后，结果是（ ）

B）41.20

8．连续执行以下命令之后，最后一条命令的输出结果是（ ） SET EXACT OFF X=”重庆”

？IIF（”重庆”$”双重喜庆”,”

“+x, ”

“-x）

A 代表空格

9．要使用数组arr1更新当前数据表的当前记录，应使用命令（ ） A）scatter to arr1 C）append from arr1

B）dimension arr1 D）gather from arr1 B

）祝福重庆

C

D）

10．将学生按籍贯（C，10）字段升序排列，如果籍贯相同，则按学号（N,4）升序排列，正确的表达式是（ ） A）籍贯，学号

B）籍贯+学号

D）籍贯+STR（学号，4）

C）籍贯，STR（学号，4）

11．假设打开工资表，按基本工资建立升序索引，然后执行了赋值语句N＝800，则下列各条命令中，错误的是（ ） A）SEEK N

B）SEEK FOR 基本工资＝N D）LOCATE FOR 基本工资＝N

C）FIND 1000

12．下列关于视图的描述中，错误的是（ ） A）通过视图可以对表进行查询 B）对过视图可以对表进行更新 C）视图是一个虚表 D）视图就是一种查询

13．设数据表文件在当前工作区已经打开，命令： COPY FIELDS <字段名表> TO <文件名> 完成的工作相当于关系运算（ ） A）连接

B）选择

C）自然连接

D）投影

14．在当前打开的图书数据表文件中，书号字段为字符型，要求将书号以字母D开头的所有图书记录复制到TS.DBF中，应使用的命令是（ ） A）COPY TO TS for “D”$书号

B）COPY TO TS for SUBSTR（书号，1，1）=“D” C）COPY TO TS for 书号=“D*”

D）COPY TO TS for right（书号，1）=“D” 15．数据库系统中对数据库进行管理的核心软件是（ ） A）DBMS

B）DB

C）OS

D）DBS

16．如果在表之间的联系中设置了参照完整性规则，并在删除规则中选择了“限制”，则当删除父表中的记录时，系统将如何处理？（ ） A）不做对照完整性检查 B）不准删除父表中的记录 C）自动删除子表中所有相关记录

D）若子表中有相关记录，则禁止父表中记录

17．执行命令DISPLAY WHILE 性别=”女”时，屏幕上显示了若干记录，但执行命令DISPLAY WHILE 性别=”男”时，屏幕上没有显示任何记录，这说明 （ ）

A）表文件是空文件

B）表文件中没有性别字段值为”男”的记录

C）表文件中的第一个记录的性别字段值不是“男” D）表文件中当前记录的性别字段不是“男”

18．下列关于DELETE-SQL命令的正确描述是（ ） A）该命令不需要指定删除表的名称 B）可以删除一个数据库文件 C）只能逻辑删除数据表中的记录 D）删除的记录不能用Recall命令恢复

19．在SELECT-SQL的查询结果中，消除重复记录的方法是（ ） A）通过指定主关键字

B）通过指定惟一索引 D）使用HAVING子句

C）使用DISTINCT子句

20．在SELECT-SQL的HAVING子句的描述中错误的是（ ） A）HAVING子句必须与GROUP BY子句同时使用 B）HAVING子句与GROUP BY子句无关

C）使用WHERE子句的同时可以使用HAVING子句 D）使用HAVING子句的作用是限定分组的条件

21．在SELECT-SQL语句中，与表达式“工资 Between 1000 and 1500”功能相同的表达式是 （ ） A）工资<=1000 and 工资>=1500 B）工资<=1500 and 工资>=1000 C）工资<=1000 or 工资>=1500 D）工资<=1500 or 工资>=1000

22．要显示数据表STU.dbf中“平均分”超过90分和不及格的全部女生记录，应使用的SQL命令是（ ）

A）SELEC * from stu where 性别=”女” .or. （平均分>=90 .and. 平均分<=60） B）SELEC * from stu where 性别=”女” .and. 平均分>90 .and. 平均分<60 C）SELEC * from stu where 性别=”女” .and. 平均分>90 .or. 平均分<60 D）SELEC * from stu where 性别=”女” .and. （平均分>90 .and. 平均分<60） 23．下列对函数的说法中正确的是（ ）

A）若函数不带参数，则调 用该函数时，函数名后面的圆括号可以省略 B）若函数有多个参数，则各参数间应用空格隔开 C）调用函数时，参数的类型、个数和顺序不一定要一致

D）调用函数时，函数名后若有圆括号，则不论有无参数都不能省略 24．顺序执行下列命令： X=100 Y=8 X=x+y

?x,x=x+y

显示结果为（ ） A）100 .f. X=15 Y=17 Do while x<=y X=x+1 Enddo ?x A）15

B）16

C）17

D）18

D）计时器

26．在Visual FoxPro常用的基类中，运行时不可见的是（ ） A）命令按钮组

B）复选框

C）表格

27．将文本框的PasswordChar属性设置为星号（*），那么，当在文本框中输入”电脑2010”时，文本框中显示的是（ ） A）电脑2010 A） A＝ B

A）LostFocus

B）Destroy

B＝A

B）100 .t. C）108 .t. D）108 .f.

25．下面程序的运行结果是（ ）

B）****** C）********

C） A＝A+B

B＝A-B

A＝B-A

D）错误设置，无法输入

D） C＝A

A＝B

B＝C

28．下列哪组语句可以将变量A、B的值互换？（ ）

B） ＝（ A+B ）/2 A

B＝（A-B）/2

29．运行程序时，对象的初始化事件是（ ）

C）Init

D）Click

30．要运行表单文件form1.scx，下列命令正确的是（ ） A）Do form1.scx C）run form1.scx

二、判断题（每小题1分，共10分）

1．内存与字段名变量都是独立于数据表而存在的。F

2．某数据库名为STU，想要打开该数据库，应使用的命令是OPEN STU。F 3．按默认的比较模式，表达式：”明天会更好”=”明天”的值为真。T 4．表达式chr(asc(“k”))-str(mod(5,-7),3)的结果是’

’，串长=4。T 5．在SELECT-SQL语句中，实现字符串匹配的运算符是“LIKE”。 T 6．根据同一个类产生的两个对象可以分别设置自己的属性值。T

7．如果希望一个内存变量只限于在本过程中使用，说明（定义）这种内在变

B）Do form form1 D）run form form1

量的命令是local。T

8．EXIT和LOOP命令只能用在FOR…ENDFOR（NEXT）循环中使用。F 9．A1=A2=5命令的作用是将5赋值给内存变量A1和A2。F 10．菜单生成器不能将一个菜单生成为一个程序文件（.MPR）。F

三、程序填空题（每空2分，共20分）

1．设有两个数据表：职工表ZGB（工号C，姓名C）；奖金表JJB（工号C，基本工资N，奖金N），请将下面的SQL语句补充完整。 （1）查询基本工资在500以下的职工姓名。

SELECT 姓名 FROM ZGB WHERE 工号 IN；

（SELECT FROM JJB WHERE ） SELECT * 3 FROM JJB ORDER BY 奖金 DESC

2．以下程序的功能是计算一个正整数的各位数字之积，并输出其乘积与位数的比值。请填空完善程序。 INPUT “X=” to x X=1 N=0

S=s*mod(x,10) X=int(x/10) Enddo ?s/n

3．有一产品生产数量表SL.dbf，其内容如下： Record# 1 2 3 4 5

编号 A1 A0 A2 A10 A12

数量 10 85 17 50 65

（2）在JJB表中，只显示奖金最高的前3条记录。

下列程序的功能是首先对产品编号索引，然后将产品数量超过20，并且编号第

2位为‘1’的产品按数量进行汇总并显示汇总结果。请填空完善程序。 use SL

index on 编号 tag bh store 0 to s do while .not. eof()

if and 数量>20 s=s+数量 endif enddo ?s Use

4．设计如图所示的表单，表单运行后，在文本框中输入一个正整数，单击“判断”命令按钮，即可弹出一提示框判断出该数是不是素数，如图2所示。请填空完成。（素数又称质数，是指除了1和该数本身以外不能被其它任何数整除的数。）

“判断”命令按钮的Click事件代码： N=val(thisform.text1.value) S=0

Do while i<=n-1 and s=0

If n%i=0 S=1 Else

Endif

Enddo If s=0

A="是一个素数" Else

A="不是一个素数" Endif

Messagebox(+a)

四、读程序写出运行结果（每小题5分，共20分）

1．设计如图3所示表单，当运行该表单后在文本框TEXT1、TEXT2、TEXT3中分别输入300、200、100三个数值，单击“选择结果”按钮 ，则文本框TEXT4中将显示的值是多少？

a=val(thisform.text1.value) b=val(thisform.text1.value) c=val(thisform.text1.value) if max(a,b)<c

thisform.text4.value=allt(str(max(a,b))) else if min(a,b)<c

thisform.text4.value=allt(str(c)) else

thisform.text4.value=allt(str(min(a,b))) endif endif

200

2．数据表（JIEJYE.dbf）内容如下： Record# 1 2 3 4 5

借书证号 0058 0179 0280 0010 0503

书名 计算机基础 操作系统 汇编语言 计算机组成

出版社 高等教育 重庆大学 人民教育 高等教育

微型计算机原理 电子工业

写出执行以下程序结果： Set exact off Use jieyue Do while .t.

If AT("计算机",书名)=0 exit endif

if 出版社="高等教育"

disp 借书证号,书名,出版社 endif skip Record# enddo 1

use

3．写出下列程序的运行结果 clea DIME A(6,6) A=0 A(1,2)=1 FOR i=2 to 6 for j=i to 2 step -1 a(i,j)=a(i-1,j)+a(i-1,j-1) ??a(i,j) endfor ? endfor

4．有如下程序，请写出运行结果：借书证号0058

书名 计算机基础

1 1 1 1 2 1 1 3 3 1 1 4 6 4 1

出版社 高等教育

clea all PUBLIC X,Y x=10 y=100 do pro1 ?x,y return

procedure pro1 private x x=5 local y do pro2 ?x,y return

procedure pro2 x=x+10 y=y-10 return

五、程序设计题（每小题10分，共20分）

1．有一个级数如下所示： 1，1，2，3，5，8，12，21……

其第一、二项为1，从第三项起，每项是前两项的和。编写一程序显示这个级数的前30项，按每行4项输出。计算最后两项的比值。 以下两种均可以： 或

15 .f. 10

90

2．在某公司的销售管理系统中，有两个数据表：销售人员档案表XSDA.dbf（编号（主键）C 4，姓名 C，8，性别 L，生日 D）和销售业绩表YJ.dbf（编号（有重复值）C 4，商品号C 10，客户 C 20，销售额Y，日期 D）。

要求编写一程序实现以下功能：反复输入销售人员编号（输入回车键退出），查询该销售人员的姓名以及销售业绩明细情况，统计其销售总额。 CLEAR SELE 1 USE XSDA

INDEX ON 编号 TAG BH SELE 2 USE JY

SET RELATION TO 编号 INTO XSDA DO WHILE .T. ACCEPT “请输入销售人员的编号：” TO BH IF LEN(ALLTRIM(BH))=0 EXIT ENDIF GO TOP S=0 SCAN FOR 编号=BH S=S+销售额 ？XSDA.姓名，商品号，客户，销售额，日期 ENDSCAN ?”销售总额：”，S ENDDO

CLOSE ALL

本文来源：https://www.bwwdw.com/article/bhge.html