在窗体下添加一个命令按钮(名为CommandI)，然后编写如下程序：打开窗体运行后，单击命令按钮，消息框的输出结果为（ ）。A. 10B. 20C. TD. F
题目
在窗体下添加一个命令按钮(名为CommandI)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为（ ）。
A. 10
B. 20
C. T
D. F
相似考题
更多“在窗体下添加一个命令按钮(名为CommandI)，然后编写如下程序：打开窗体运行后，单击命令按钮，消息框的输出结果为（ ）。A. 10B. 20C. TD. F”相关问题
-
第1题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub f(ByVal x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(i)
If i＞4 Then i=i*2
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
正确答案：3
3 解析： 本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用ByRef声明，说明此参数为传址调用；没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x，说明为传值调用，此时对x的任何更改不会影响调用它的实参i，所以执行完callf(i)这条语句后i的值不变仍为3，当然也不满足If语句的条件，故此最后输出结果为3。 -
第2题：
在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为__________。
正确答案：
20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。 -
第3题：
在窗体中添加一个名称为commandl的命令按钮，然后编写如下程序：
体打开运行后，单击命令按钮，则消息框的输出结果为（ ）
A. 3
B. 7
C. 9
D. 16
正确答案：C
考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为3，然后依次调用n和f2；在f1中对x平方；在t2中又用Dim定义了一个局部变量X，按照局部覆盖全局的原则，在f2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为9。
-
第4题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：
窗体打开运行后，单击命令按扭，则消息框的输出结果为（ ）。A. 10
B. 30
C. 40
D. 50
正确答案：B
本题考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为10，然后依次调用s1和s2；在s1中对x自加了20；在s2中用Dim定义了一个局部变量x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。 -
第5题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码： Pfivate Sub Command 1 Click（ ）
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。A. 1
B. 2
C. 3
D. 4
正确答案：A
本题考查条件语句的知识。在 If．．．Then…Elself．．．语句中，当某一个条件满足时，将会执行Then后面的语句，并且随后退出条件分支。在本题中，a=75满足第一个条件“a>60”．将执行Then后的语句。将1赋值给变量g，然后结束条件判断。最后将g的值l输出到消息框，所以消息框的输出结果是1。 -
第6题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。A. 3
B. 4
C. 6
D. 7
正确答案：A
本题考查VBA中参数传递的知识。在 VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用 ByRef声明，说明此参数为传址调用：没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x，说明为传值调用，此时对X的任何更改不会影响调用它的实参i，所以执行完Call f(i)这条语句后i的值不变仍为3，当然也不满足If语句的条件，故此最后输出结果为3。
-
第7题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。
A)1
B)2
C)3
D)4
正确答案：D
本题考查VBA中选择结构的知识。在本题中用了多个If分支结构，这些结构是顺序的而不是嵌套的，所以会顺序执行，判断是否满足条件。首先75不小于60，所以不执行x=1；然后再判断75不小予70，所以不执行x=2；再接着判断75小于80，所以执行x=3；最后判断75小于90，所以执行x=4。最后消息框里输出的x值为4。 -
第8题：
在窗体中添加一个名为Command1的命令按钮，然后编写如下程序：
Private Sub s(By Val p As Integer)
p=p*2
End Sub
Prirate Sub Command1_Click( )
Dim i As Integer
i=3
Call s(i)
If i＞4 Then i=i^2
MsgBox I
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
正确答案：3
3 解析： 由于VBA中，传值调用(Byval选项)为“单向”作用形式即过程调用只是相应位置实参的值“单向”传送给形参处理，而被调用过程内部对形参的任何操作引起的形参值的变化均不会反馈、影响实参的值。此题中：形参p被说明为ByRef唯值形式的整型量，当运行Command1_Click( )过程，并调用s( )函数，实参i传送其值给形参p，p发生变化P＝p*2＝3*2＝6。但因为使用的是DyVal“单向”传值形式，实参i的值不会发生变化，仍然为3。i＞4条件不成立，不会执行“i＝i^2”语句，所以最后i的值为3。 -
第9题：
在窗体中添加一个命令按钮（名称为Commandl），然后编写如下代码。 Private Sub Commandl Click（ ） a=0：b=5：c=6MsgBox a=b+cEndSub窗体打开运行后，如果单击命令按钮，则消息框的输出结果为（ ）。
A.11
B.a=11
C.0
D.False
正确答案：D
暂无解析，请参考用户分享笔记 -
第10题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：
Function m(x as Integer，y as Integer) as Integer
m=IIf(x＞y，x，y)
End Function
Private Sub Commandl Click()
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,B)
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为【 】。
正确答案：2
2 解析：本题考查考生VBA程序设计的能力。在本题中，考生应该掌握IIF条件接口。题目中调用函数m(x,y)，并将a的值传给x，将b的值传给y，因此x=1，y=2。对于函数IIf(x＞y,x,y)来说，其功能是当x＞y为真时返回x的值，当 x＞y为假时返回y的值。在本题中，因为x＞y为假，因此应该返回y的值，即返回2。 -
第11题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。
正确答案：
15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时，参数有两种传递方式：传址传递和传值传递。如果在函数声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本题中形参均为传址传递，即a=x=3，b=y=5，c=z=10。但是在子程序里面对c重新赋值为c=a*b=15，这个值l5会回送给实参2，所以最后显示的值Z也就是l5。 -
第12题：
（ 11 ）在窗体中添加一个命令按钮，名称为 Command1 ，然后编写如下程序：
Private Sub Command1_Click()
Dim s ， i
For i=1 To 10
s=s+i
Next i
MsgBox s
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为 【 11 】 。
正确答案：
-
第13题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
x=10
y=20
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
正确答案：20
20 解析： 本题考查IIf函数的知识。对于IIf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x＞y为假，所以返回y的值也就是返回20。 -
第14题：
在窗体中添加～个名称为Commandl的命令按钮，然后编写如下事件代码：
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。A. 1
B. 2
C. 3
D. 4
正确答案：B
本题考查条件语句的基础知识。If．．．Then语句的特点是每当条件表达式为真时执行Then后面的语句序列，在本题中，A=75，首先判断A>60是否为真，由于满足条件，所以I的值为1，然后判断A>70是否为真，由于还是满足条件，所以l的值又被赋为2，后面的两个条件均不满足，所以最终I的值为2。
-
第15题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下事件代码：
窗体打开运行后，单击命令按钮，则消息框的输出结果是（ ）。A. 1
B. 2
C. 3
D. 4
正确答案：D
本题考查VBA中选择结构的知识。在本题中用了多个If分支结构，这些结构是顺序的而不是嵌套的，所以会顺序执行，判断是否满足条件。首先75不小于60，所以不执行x=1；然后再判断75不小于70，所以不执行x=2；再接着判断75小于80，所以执行x=3：最后判断75小于90，所以执行x=4。最后消息框里输出的X值为4。
-
第16题：
在窗体上添加一个命令按钮(名为Commandl)，编写如下事件过程：
打开窗体后，单击命令按钮，消息框的输出结果是（ ）。A. 7
B. 15
C. 157
D. 528
正确答案：B
本题考查VBA中多重循环的知识。见 到多重循环的问题不要害怕，认真地分析清楚每一次循环这种问题 就迎刃而解了。本题中，在每一次外循环开始的时候都把x的值置 为4。所以我们只分析最后一次循环就可以了；同理中层循环每一 次开始前都把x的值置为3，所以这个问题最后实际上就是x的初 值为3，执行最内层循环直到结束就可以了。根据程序内循环执行 两次．最后x=3+6+0=15。
-
第17题：
在窗体中添加～个命令按钮(名称为Commandl)，然后编写如下代码：
窗体打开运行后，如果单击命令按钮，则消息框的输出结果为（ ）。A. 0
B. 9
C. a=9
D. False
正确答案：D
本题考查VBA程序设计的基础知识。程序中的”MsgBox a=b+c”语句中的“=”的含义是判断是否相等而不是赋值。这条语句的含义是在消息框中显示a与b+c的值比较的结果，由于变量的初值”a=3：b=4：c=5”，所以判断条件语句相当于判断3--9是否为真，很明显结果为假，所以消息框的输出结果为逻辑假False。
-
第18题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。 -
第19题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是【 】。
正确答案：51
51 解析：本题循环内部完成b=231+2+3+4+5+6的操作，当k=7时，结束循环，故消息框中显示的是51。 -
第20题：
在窗体上添加一个命令按钮(名为Commandl)，编写如下事件过程：
打开窗体后，掣击命令按钮，消息框的输出结果是（ ）。
A)7
B)15
C)157
D)528
正确答案：B
本题考查VBA中多重循环的知识。见到多重循环的问题不要害怕，认真地分析清楚每一次循环这种问题就迎刃而解了。本题中，在每一次外循环开始的时候都把x的值置为4，所以我们只分析最后一次循环就可以了；同理中层循环每一次开始前都把x的值置为3，所以这个问题最后实际}：就是x的初值为3，执行最内层循环直到结束就可以了。根据程序内循环执行两次，最后x=366=15。 -
第21题：
在窗体中添加一个命令按钮(名称为Commandl)，然后编写如下代码：
窗体打开运行后，如果单击命令按钮，则消息框的输出结果为（ ）。
A)0
B)9
C)a=9
D)False
正确答案：D
本题考查VBA程序设计的基础知识。程序中的”MsgBoxa=bC”语句中的“=”的含义是判断是否相等而不是赋值，这条语句的含义是在消息框中显示a与bC的值比较的结果，由于变量的初值”a=3：b=4：C=5”，所以判断条件语句相当于判断3=9是否为真，很明显结果为假，所以消息框的输出结果为逻辑假False。 -
第22题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
正确答案：
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。 -
第23题：
（ 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 】 。
正确答案：