计算机二级
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：Private Sub Command1_CliekDim b, kFor k = 1 to 6b=23+kNext kMsgBox b + kEnd Sub打开窗体后，单击命令按钮，消息框的输出结果是【 】。
题目
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是【 】。
相似问题和答案
第1题：
（ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：
Private Sub Command1_Click （）
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。
第2题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：
15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。
第3题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。
第4题：
在窗体上添加一个命令按钮(名为Commandl)，编写如下事件过程：
打开窗体后，单击命令按钮，消息框的输出结果是（ ）。
A. 7
B. 15
C. 157
D. 528
本题考查VBA中多重循环的知识。见 到多重循环的问题不要害怕，认真地分析清楚每一次循环这种问题 就迎刃而解了。本题中，在每一次外循环开始的时候都把x的值置 为4。所以我们只分析最后一次循环就可以了；同理中层循环每一 次开始前都把x的值置为3，所以这个问题最后实际上就是x的初 值为3，执行最内层循环直到结束就可以了。根据程序内循环执行 两次．最后x=3+6+0=15。
第5题：
在窗体上添加一个命令按钮，名为Command1，事件过程如下，则执行结果是______。
A．2 4 6 8
B．1 3 5 7
C．3 6 6 12
D．4 8 12 16
解析：本题的难点是子过程调用和形参与实参结合的对应关系。数组a()先被赋初值，再用子过程名调用子过程，在子过程内数组a()又被重新赋值，通过按值传值将a()的数据带回。
第6题：
在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为__________。
20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。
第7题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
x=10
y=20
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
20 解析： 本题考查IIf函数的知识。对于IIf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x＞y为假，所以返回y的值也就是返回20。
第8题：
在窗体上添加一个命令按钮(名为Cmd)，然后编写如下事件过程：
Private Sub Cmd_Click( )
Dim sum,k
For k=1 to 6
sum=30+k
Next k
MsgBox sum+k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是【 】。
43 解析：在循环体内sum每次均为30加k，最后一次循环为30+6，k自增为7，消息框输出结果为43。
第9题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
36