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
相关资料
| 
