【题目描述】
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。
A)23
B)33
C)43
D)53
第1题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：
PrivateSubo(ByVidpAslnteger)
p=p*2
EndSub
PrivateSubCommandl_C1kk()
DimiAsIntcger
Cails(1)
Ifi＞4Thcni=i＾2
MsgBoxi
EndSub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
第2题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_CliCk() A=75 If A＞60 Then I=1 If A＞70 Then I=2 If A＞80 Then I=3 If A＞90 Then I=4 MsgBox I End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是______。
A．1
B．2
C．3
D．4
第3题：
【题目描述】
假定在窗体中的通用声明段已经定义有如下的子过程：
打开窗体运行后，单击命令按钮，消息框输出的值分别为（ ）。
A)20和10
B)10和20
C)10和10
D)20和20
|
正确答案：A |
本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用ByRef声明，说明此参数为传址调用；没有说明传递类型，则默认为传址传递。即形参的结果会传递给实参。本题中形参完成了交换，由于默认为传址传递，交换后的值也会影响到实参a和b，即a和b也完成了交换。
第4题：
在窗体中添加～个名称为Commandl的命令按钮，然后编写如下事件代码：
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。
A. 1
B. 2
C. 3
D. 4
第5题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_C1ick()
Dim a(10,10)
For m=2 T0 4
For n=4 TO 5
A (m,n)=m*n
Next n
Next m
MsgBox a(2,4)+a(3,5)+a(4,5)
End Sub
打开窗体运行后，单击命令按钮，则消息框的输出结果是( )。
A．23
B．33
C．43
D．53
第6题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码： Private Sub Commandl_Click() A＝75 IfA<60 Then x＝1 IFA<70 Then x＝2 IfA<80 Then x＝3 IFA<90 Then x＝4 MsgBox x End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。
A．1
B．2
C．3
D．4
第7题：
在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为__________。
第8题：
【题目描述】
在窗体中使用一个文本框名为x．接受输入值，有一个命令按钮test，事件代码如下：
Private Sub test_Click
y = 0
For i = 0 To Me!x
y = y + 2 * i + 1
Next i
MsgBox y
End Sub
打开窗体后，若通过文本框输入值为3，单击命令按钮，输出的结果是 【12】 。
【参考答案分析】：
16
求详解过程
第一次 y=0,i=0 y=0+2*0+1=1
第二次 y=1,i=1 y=1+2*1+1=4
第三次 y=4,i=2 y=4+2*2+1=9
第四次 y=9,i=3 y=9+2*3+1=16
第9题：
在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件代码：
private Sub Command1 Click()
Dima(10,10)
Form＝2 To 4
Forrn＝4 To 5
a(m,n)＝m*n
Next n
Next m
MsgBoxa(2,4)+a(3,5)+a(4,5)
End Sub
打开窗体运行后，单击命令按钮，则消息框的输出结果是( )。
A．23
B．33
C．43
D．53
第10题：
在窗体中添加一个名称为commandl的命令按钮，然后编写如下程序：
体打开运行后，单击命令按钮，则消息框的输出结果为（ ）
A. 3
B. 7
C. 9
D. 16