vb期末.docx

vb期末.docx

《vb期末.docx》由会员分享，可在线阅读，更多相关《vb期末.docx（107页珍藏版）》请在冰豆网上搜索。

vb期末

试卷方案：

201105VisualBasic期末考试方案

题型：

5种

1.单选题（20题*1=20分）

2.程序运行结果填空题（15空*2=30分）

3.完善程序填空题（10空*2=20分）

4.改错题（3错*4=12分）

5.编程题（共2题，1题为8分，另一题10分=18分）

一、单项选择共50题

第1题题号:

44

以下有关对象属性的说法中，错误的是___________.

A.工具箱中的控件并不是VB中所有的控件

B.若将Frame的Enabled属性设置为False，则不能使用放置在Frame里面的控件

C.对象的Name属性在运行时不能改变

D.对象的所有属性都可以在属性窗口中设置

答案：

D

第2题题号:

3

数学表达式的VB算术表达式为_______.

A.Sin（27）+Sqr（x+Exp3）/（x+y）

B.Sin（27*3.14159/180）+Sqr（x+Exp（3））/Abs（x+y）

C.Sin（27*3.14159/180）+Sqr（x+e^3）/Abs（x+y）

D.Sin（27*pi/180）+Sqr（x+Exp（3）/Abs（x+y）

答案：

B

第3题题号:

17

下列有关对象的叙述中,正确的是______

A.对象由属性，事件和方法构成

B.对象的所有属性既可以在属性窗口设置，又可以在程序运行时用赋值语句设置

C.对象的事件一定就是由VB预先设置好的人工干预的动作

D.对象的方法是对象响应某个事件后执行的一段程序代码

答案：

A

第4题题号:

46

表达式CInt（4.5）+Cint（-4.51）+Int（4.9）+Int（-4.1）+Fix（-1.9）+0Mod2的运算结果是___.

A.1B.-1C.–2D.–3

答案：

D

第5题题号:

32

下列关于菜单的说法中,错误的是__________.

A.每一个菜单项就是一个对象，并且可设置自己的属性和事件

B.菜单项不可以响应DblClick事件

C.VB6.0允许创建超过四级的子菜单

D.程序执行时，如果要求菜单项是灰色，不能被用户选择，则应设置菜单项的Enabled属性为False

答案：

C

第6题题号:

42

以下关于数组的说法中,错误的是__________.

A.使用了Preserve子句的Redim语句，只允许改变数组最后一维的上界

B.对于动态数组,Redim语句可以改变其维界但不可以改变其数据类型

C.Erase语句的功能只是对固定大小的数组进行初始化

D.Lbound函数返回值是指定数组某一维的下界

答案：

C

第7题题号:

8

设a=3,b=2,c=1,运行printa>b>c的结果是____________.

A.TrueB.FalseC.1D.出错

答案：

B

第8题题号:

4

以下说法不正确的是____________.

A.使用不带关键字Preserve的ReDim语句可以重新定义数组的维数

B.使用不带关键字Preserve的ReDim语句可以改变数组各维的上、下界

C.使用不带关键字Preserve的ReDim语句可以改变数组的数据类型

D.使用不带关键字Preserve的ReDim语句可以对数组中的所有元素进行初始化

答案：

C

第9题题号:

37

在列表框List1中有若干列表项,可以删除选定列表项的语句是__________.

A.List1.text=""

B.List1.List（List1.ListIndex）=""

C.list1.Clear

D.List1.RemoveItemList1.ListIndex

答案：

D

第10题题号:

41

数学表达式对应的VB表达式是__________.

A.（e^（2*π*x-5）*Log（x）+（Sin（2x））^3）/Sqr（Sin（x）-Cos（x^2））

B.（Exp（2*3.14159*x-5）*Log（x）+（Sin（2*x））^3）/Sqr（Sin（x）-Cos（x^2））

C.（Exp（2*π*x-5）*Ln（x）+（Sin（2*x））^3）/Sqr（Sin（x）-Cos（x^2））

D.e^（2*3.14159*x-5）*Ln（x）+（Sin（2*x））^3）/Sqr（Sing（x）-Cos（x^2））

答案：

B

第11题题号:

14

以下有关数组参数的说明中，正确的是______

A.在过程中也可用Dim语句对形参数组进行说明

B.动态数组作为实参时，可用ReDim语句在过程中改变对应形参数组的维界

C.调用过程时，数组名不能作为实参

D.数组可以按地址传递也可以按植传递

答案：

B

第12题题号:

43

下列有关过程的说法中,错误的是_____________.

A.在Sub或Function过程内部不能再定义其它Sub或Function过程

B.对于使用ByRef说明的形参,在过程调用时形参和实参只能按传址方式结合

C.递归过程既可以是递归Function过程,也可以是递归Sub过程

D.可以像调用Sub过程一样使用Call语句调用Function过程

答案：

B

第13题题号:

49

要将焦点设置在某个控件上,以下四个选项中正确的是______.

A.只能使用鼠标直接点击控件

B.只能使用Tab键将焦点移到该控件

C.只能在程序中调用该控件的SetFocus方法

D.A、B、C三选项中涉及的方法均可使用

答案：

D

第14题题号:

55

以下Case语句中,能正确描述Y的绝对值大于6的是______.

A.CaseAbs（Y）>6

B.Case-6To6

C.CaseNot（-6To6）

D.CaseIs<-6,Is>6

答案：

D

第15题题号:

45

以下关于变量作用域的叙述中,正确的是____________.

A.窗体中凡用Private声明的变量只能在某个指定的过程中使用

B.模块级变量只能用Dim语句声明

C.凡是在窗体模块或标准模块的通用声明段用Public语句声明的变量都是全局变量

D.当不同作用域的同名变量发生冲突时，优先访问局限性小的变量

答案：

C

第16题题号:

16

以下关于数值常量的说法中,错误的是______

A.八进制数的表示方法是在数字前面加&O

B.十六进制数的表示方法是在数字前面加&H

C.在浮点运算中使用D来分隔尾数和指数时，系统将把该数值作为单精度型数处理

D.32768是合法的数值常量

答案：

C

第17题题号:

27

数学表达式对应的VB表达式是___________.

A.Abs（e^x+Sin（30）^3）∕Sqr（x+y））

B.Abs（Exp（x）+Sin（30）^3）∕（Sqr（x+y））

C.Abs（e^x+Sin（30*3.14159∕180）^3）∕（Sqr（x+y））

D.Abs（Exp（x）+Sin（30*3.14159∕180）^3）∕Sqr（x+y））

答案：

D

第18题题号:

29

下面的4个表达式中,有关_________个能够对Single类型变量x（正数）的第3位小数正确地进行四舍五入计算.

Format（x,″#.00″）

Int（100*（x+0.005））/100

CInt（100*（x+0.005）/100

Fix（100*（x+0.005））/100

A.1个B.2个C.3个D.4个

答案：

C

第19题题号:

26

执行以下语句时,会出现错误提示的是__________.

A.Print"2b3"+12.5B.Print"12.5"+12C.Print"12.5"&12.5D.Print"2e3"+12

答案：

A

第20题题号:

34

以下Case语句含有错误的是___________.

A.Case0To10B.CaseIs>10C.CaseIs>10AndIs<50D.Case3,5,Is>10

答案：

C

第21题题号:

1

下列语句中,正确的是__________

A.Textl.SetFocusB.Forml.ClearC.Labell.SetFocusD.Listl.Cls

答案：

A

第22题题号:

9

下列选项中,所包含的所有表达式能够将两位整数x的个位数与十位数对调（如将78转换为87）的是_______________.

①Val（Right（X,1）&Left（X,1））②Val（Right（Str（X）,1）&Left（Str（X）,1））

③Val（Right（CStr（X）,1）&Left（CStr（X）,1））④Val（Mid（X,2,1）+Mid（X,1,1））

A.①②B.②③C.②④D.①③④

答案：

D

第23题题号:

15

以下关于子过程或函数的定义中,正确的是______

A.Subf1（nAsString*1）

B.Subf1（nAsInteger）AsInteger

C.Functionf1（f1AsInteger）AsInteger

D.Functionf1（ByValnAsInteger）

答案：

D

第24题题号:

54

下列有关控件数组的说法中,错误的是______.

A.控件数组由一组具有相同名称和相同类型的控件组成，不同类型的控件无法组成控件数组

B.控件数组中的所有控件不得具有各自不同的属性设置值

C.控件数组中的所有控件共享同一个事件过程

D.控件数组中每个元素的下标由控件的Index属性指定

答案：

B

第25题题号:

7

以下对数组参数的说明中,错误的是___________.

A.在过程中可以用Dim语句对形参数组进行声明

B.形参数组只能按地址传递

C.实参为动态数组时，可用ReDim语句改变对应形参数组的维界

D.只需把要传递的数组名作为实参，即可调用过程

答案：

A

第26题题号:

6

要向文件datal.txt添加数据,正确的文件打开命令是_____________.

A.Open"datal.txt"ForOutputAs#1

B.Open"datal.txt"ForInputAs#1

C.Open"datal.txt"ForAppendAs#5

D.Open"datal.txt"ForWriteAs#5

答案：

C

第27题题号:

31

下面有关数组处理的叙述中，正确的是__________.

A.在过程中使用ReDim语句可以改变动态数组数据的类型

B.在过程中，可以使用Dim、Private和Static语句来定义数组

C.用ReDim语句重新定义动态数组时，可以改变数组的大小，但不能改变数组的维数

D.不可以用Public语句在窗体模块的通用处说明一个全局数组

答案：

D

第28题题号:

35

下面的表达式中,运算结果为True的是__________.

A."abcrd"<="ABCRD"

B.Int（134.69）<=CInt（134.69）

C.3>2>1

D.Mid（"Visual",1,4）=Right（"lausiV",4）

答案：

B

第29题题号:

36

设计界面时,要使一个文本框具有水平和垂直滚动条,应先将其________属性置为True,再将ScrollBar属性设置为3.

A.MultiLineB.AutoSizeC.AlignmentD.RightToLeft

答案：

A

第30题题号:

23

下面有关数组的说法中,正确的是______

A.数组的维下界不可以是负数

B.模块通用声明处有OptionBase1，则模块中数组定义语句DimA（0To5）会与之冲突

C.模块通用声明处有OptionBase1，模块中有DimA（0To5）,则A数组第一维维下界为0

D.模块通用声明处有OptionBase1，模块中有DimA（0To5）,则A数组第一维维下界为1

答案：

C

第31题题号:

53

下面有关数组的叙述中,不正确的是______.

①在过程中用ReDim语句定义的动态数组,其下标的上下界可以是变量

②数组作为形式参数时,传递的是每个数组元素的值

③在窗体模块的通用声明处可以用Public说明一个全局数组

④数组定义语句中可以用负数或小数来指定某一维的维下界或维上界的值

A.②③B.①③④C.①②③④D.③④

答案：

A

第32题题号:

11

下列关于对象SetFocus与GotFocus的描述中,正确的是_____

A.SetFocus是事件,GotFocus是方法B.Setfocus和Gotfocus都是事件

C.Setfocus和GotFocus都是方法D.SetFocus是方法,GotFocus是事件

答案：

D

第33题题号:

2

创建一个名为"文件"的菜单项,欲使其可用Alt+F方式访问,则在菜单编辑器的标题文本框中应输入_________.

A.文件（$F）B.文件（&F）C.文件（#F）D.文件（%F）

答案：

B

第34题题号:

50

在下列属性中,属于CommandButton控件、ListBox控件共有的是______.

A.Caption、TextB.Visible、FontC.Caption、VisibleD.List、Visible

答案：

B

第35题题号:

22

下列能够正确表示条件"X≤Y

A.X≤Y

答案：

B

第36题题号:

33

以下关于Function过程的说法中,错误的是___________.

A.Function过程名可以有一个或多个返回值

B.在Function过程内部不得再定义Function过程

C.Function过程中可以包含多个ExitFunction语句

D.可以像调用Sub过程一样调用Function过程

答案：

A

第37题题号:

52

下面的关系表达式中,运算结果为True的是______.

A.CInt（1.5）=Int（1.5）B.Fix（1.5）=Int（1.5）

C.Fix（-1.5）=CInt（-1.5）D.Fix（-1.5）=Int（-1.5）

答案：

B

第38题题号:

21

已知XB,则下列表达式中,结果为True的是______

A.Sgn（X-Y）+Sgn（A-B）=-1B.Sgn（X-Y）+Sgn（A-B）=-2

C.Sgn（Y-X）+Sgn（A-B）=2D.Sgn（Y-X）+Sgn（A-B）=0

答案：

C

第39题题号:

38

执行__________语句时,会出现出错提示信息.

A.Print5+7=14B.Print16384*2

C.Print32768*2D.Print"14"+32

答案：

B

第40题题号:

51

数学表达式对应的VisualBasic表达式是______.

A.Sin（30*3.14159/180）+Sqr（Log（x）+y）/2*3.14159+Exp（x+y）

B.（Sin（30*π/180）+Sqr（Ln（x）+y））/（2*π+Exp（x+y））

C.Sin（30*180/3.14159）+Sqr（Log（x）+y）/（2*3.14159+e^（x+y））

D.（Sin（30*3.14159/180）+Sqr（Log（x）+y））/（2*3.14159+Exp（x+y））

答案：

D

第41题题号:

48

在一个多窗体程序中,可以仅将窗体Form2从内存中卸载的语句是________.

A.Form2.UnloadB.UnloadForm2

C.Form2.EndD.Form2.Hide

答案：

B

第42题题号:

12

Print方法可在______上输出数据.

①窗体②文本框③图片框④标签⑤列表框⑥立即窗口

A.①③⑥B.②③⑤C.①②⑤D.③④⑥

答案：

A

第43题题号:

47

若要使逻辑表达式x>yXory

A.x=3、y=3、z=4B.x=2、y=1、z=2

C.x=1、y=3、z=2D.x=2、y=2、z=2

答案：

A

第44题题号:

5

下列____________是合法的变量名.

A.absB.–alC.cdcdD.Abe_10

答案：

D

第45题题号:

10

下列______是正确的VB常量.

A.D-6B.E-6C.5DD.5E-6

答案：

D

第46题题号:

56

若在模块中用PrivateFunctionFun（AasSingle,BasInteger）AsInteger定义了函数Fun.调用函数Fun的过程中定义了I、J和K三个Integer型变量,则下列语句中不能正确调用函数Fun的语句是___________.

A.Fun3.14,JB.CallFun（I,365）C.Fun（I）,（J）D.K=Fun（"24","35"）

答案：

B

第47题题号:

57

若需要在同一窗体内安排两组相互独立的单选按钮（OptionButton）,可使用______控件做容器将它们分开.

①TextBox②PictureBox③Image④Frame

A.①或②B.②或③C.②或④D.③或④

答案：

C

第48题题号:

58

以下关于文件的叙述中，错误的是__________。

A.用Output模式打开一个顺序文件，即使不对它进行写操作，原来的内容也被清除

B.可以用Print#语句或Write#语句将数据写到顺序文件中

C.若以Output、Append、Random、Binary方式打开一个不存在的文件，系统会出错

D.顺序文件或随机文件都可以用二进制访问模式打开

答案：

C

第49题题号:

24

窗体上有若干命令按钮和一个文本框,程序运行时焦点置于文本框中,为了在按下回车键时执行某个命令按钮的Click事件过程,需要将该按钮的_________属性设置为True.

A.EnabledB.DefaultC.CancelD.Visible

答案：

B

第50题题号:

13

数学表达式对应的VB表达式是______

A.（x^5-Cos（29））/Sqr（e^x+In（y））+5

B.（x^5-Cos（29））/（Sqr（Exp（x）+Log（y））+5）

C.（x^5-Cos（29*3.14159/180））/（Sqr（Exp（x）+Log（y））+5）

D.（x^5-Cos（29*3.14159/180））/（Sqr（e^x+Log（y））+5

答案：

C

二、填空共20题

第1题题号:

28

运行下列程序，单击Command1,在窗体上显示的第一行内容是______【1】____,第二行的内容是_____【2】____,第三行的内容是_____【3】______。

OptionExplicit

PrivateSubCommand1_Click（）

DimsAsString

s="Basic"

Calltrans（s）

EndSub

PrivateSubtrans（sAsString）

DimjAsInteger,tAsString

DimkAsInteger

k=3

Do

j=InStr（s,"a"）

t=LCase（Right（s,j））

s=Right（t,Len（s）-k）&Left（s,Len（t））

k=k-1

Prints

LoopUntilk=0

EndSub

答案：

=======（答案1）=======

icBa

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

baicBa

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

baba

第2题题号:

18

执行下面程序，单击Command1，则窗体上显示的第一行是＿【1】＿＿＿，第三行是＿＿【2】＿＿，最后一行是＿＿【3】＿＿。

OptionExplicit

PrivateSubCommand1＿Click（）

DimxAsInteger,yAsInteger

x=12:

y=0

DoWhilex>0

IfxMod4=0Then

y=y+x

Else

y=y-x

EndIf

x=x-3

Printx,y

Loop

EndSub

答案：

=======（答案1）=======

912

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

3-3

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

0-6

第3题题号:

27

执行下面的程序，单击Command1,窗体上显示的第一行是______【1】_____，第二行是______【2】____,第四行是______【3】_____。

OptionExplicit

PrivateSubCommand1_Click（）

DimaAsInteger,bAsInteger

a=1:

b=1

Callsub1（a,b）

Printa,b

EndSub

PrivateSubsub1（aAsInteger,bAsInteger）

a=a+b:

b=b+a

Printa,b

Ifa>10Then

a=a+b

b=b+a

Else

Callsub1（a,b）

EndIf

EndSub

答案：

=======（答案1）=======

23

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

58

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

3455

第4题题号:

26

运行下面的程序，单击Command1,在窗体上显示的变量a的值为____【1】______，变量b的值为_____【2】____,变量c的值为_____【3】______。

OptionExplicit

PrivateSubCommand1_Click（）

DimaAsInteger,bAsInteger,cAsInteger

a=5:

b=10:

c=15

Printfun（a,b,c）+fun（a,b,c）

Printa,b,c

EndSub

PrivateFunctionfun（xAsInteger,yAsInteger,zAsInteger）AsInteger

z=x

x=x+y

y=y+z

fun=x+y

EndFunction

答案：

=====