2014年计算机二级考试VB专家预测试卷及答案4

　　21.以下说法中错误的是( )。

　　A.如果把一个命令按钮的Default属性设置为True，则按回车健与单击该命令按钮的

　　作用相同

　　B.可以用多个命令按钮组成命令按钮数组

　　C.命令按钮只能识别单击(Click)事件

　　D.通过设置命令按钮的Enabled属性，可以使该命令按钮有效或禁用

　　22.以下关于局部变量的叙述中错误的是( )。

　　A.在过程中用Dim语句或Static语句声明的变量是局部变量

　　B.局部变量的作用域是它所在的过程

　　C.在过程中用Stalic语句声明的变量是静态局部变量

　　D.过程执行完毕，该过程中用Dim或Static语句声明的变量即被释放

　　23.以下程序段的输出结果是( )。

　　x=1

　　y=4

　　Do Until y>4

　　x= x * y

　　y=y+1

　　Loop

　　Print X

　　A.1

　　B.4

　　C.8

　　D.20

　　24.如果执行一个语句后弹出如图所示的窗口，则这个语句是( )。

　　A.InputBox("输人框"，"请输入VB数据")

　　B.x=InputBox("输入框"，"请输入VB数据")

　　C.InputBox("请输入VB数据"，"输入框")

　　D.x=InputBox("清输入VB数据"，"输入框") 25.有如下事件过程：

　　Private Sub Form Click()

　　Dim n As Integcr

　　x=0

　　n=InputBox("请输入一个整数")

　　For i=1 To i

　　For i=1 To i

　　x=x+1

　　Next j

　　Next i

　　Print x

　　End sub

　　程序运行后，单击窗体，如果在输入对话框中输入5，则在窗体上显示的内容是( )。

　　A.13

　　B.14

　　C.15

　　D.16

　　26.请阅读程序：

　　Sub subP(b()As Integer)

　　For i=1 To4

　　b(i)=2*i

　　Next i

　　End Sub

　　Private Sub Commandl Click()

　　Dim a(1 To 4)As Integer

　　a(1)=5:a(2)=6:a(3)=7:a(4)=8

　　subP a()

　　For i=1 To 4

　　Print a(i)

　　Next i

　　End Sub

　　运行上面的程序，单击命令按钮，则输出结果是( )。

　　A. 2

　　4

　　6

　　8

　　B. 5

　　6

　　7

　　8

　　C. 10

　　12

　　14

　　16

　　D.出错

　　27.Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即1，1，2，3，5，8，13，21，34，55，89，…某人编写了下面的函数，判断大于1的整数X是否是Fibonacci数列中的某个数，若是，则返回True，否则返回False。

　　Function Isfab(x As Integer)As Boolean

　　Dim ii As Integer，b As Integer，C As Integer，flag As Boolean

　　flag=False

　　a=1：b=1

　　Do While x　　c=a+b

　　a=b

　　b=c

　　If x=b Then flag=True

　　Loop

　　Isfab=flag

　　End Function

　　测试时发现对于所有正整数X，函数都返回False，程序需要修改。下面的修改方案中正确的是( )。

　　A.把a=b与b=C的位置互换

　　B.把c=a+b移到b=C之后

　　C.把Do While xb

　　D.把If x=b Then flag=True改为If x=a Then flag True

　　28.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：

　　Private Sub Coinmand1 Click()

　　Dim a$，b$，c$，k%

　　a="ABCD"

　　b="123456"

　　c=""

　　k=1

　　Do While k<=Len(a)Or k<=Len(b)

　　If k<=Len(a)Then

　　c=c&Mid(a，k，1)

　　End If

　　If k<=Len(b)Then

　　c=c&Mid(a，k，1)

　　End If

　　k=k+1

　　Loop

　　Print c

　　End Sub

　　运行程序，单击命令按钮，输出结果是( )。

　　A.123456ABCD

　　B.ABCD123456

　　C.D6C584A321

　　D.A1B2C3D456

　　29.请阅读程序：

　　Private Sub Form Click()

　　m=1

　　For i=4To 1 Step-1

　　Print Str(m);

　　m=m+1

　　For j=1 To i

　　Print"*"：

　　Next j

　　Print

　　Next i

　　End Sub

　　程序运行后，单击窗体，则输出结果是( )。

　　A.1****

　　2***

　　3**

　　4*

　　B.4****

　　3***

　　2**

　　1*

　　C.****

　　***

　　**

　　*

　　D.*

　　**

　　***

　　****

　　30.在窗体上画一个命令按钮(其名称为Command1)，然后编写如下代码：Private Sub Command1 Click()

　　Dim a

　　a=Array(1，2，3，4)

　　i=3：j=1

　　Do While>=0

　　s=s+a i)*j

　　i=i-1

　　j=j*1c

　　Loop

　　Print S

　　End Sub

　　运行上面的程序，单击命令按钮，则输出结果是( )。

　　A.4321

　　B.123

　　C.234

　　D.1234

　　相关推荐：

　　2014计算机等级《二级VB》上机预测题及答案汇总

　　考试吧考后首发2014年3月计算机等考真题及答案通知

　　考试吧推荐：2014年3月计算机二级考前冲刺备考专题