窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command_Click()Dim a As Integer，b As Integera=8b=12Print Fun(a，b)；a；bEnd SubPrivate Function Fun(ByVal a As Integer，b As Integer)As Integera=a Mod 5b=b＼5Fun=aEnd Function程序运行时，单击命令按钮，则输出结果是A．3 3 2B．3 8 2C．8 8 12D．3
题目
窗体上有一个名为Commandl的命令按钮，并有如下程序：
Private Sub Command_Click()
Dim a As Integer，b As Integer
a=8
b=12
Print Fun(a，b)；a；b
End Sub
Private Function Fun(ByVal a As Integer，b As Integer)As Integer
a=a Mod 5
b=b＼5
Fun=a
End Function
程序运行时，单击命令按钮，则输出结果是
A．3 3 2
B．3 8 2
C．8 8 12
D．3 8 1 2
相似考题
更多“窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command_Click()Dim a As Intege ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A.机床
B.车床
C.钻床
D.轴承
正确答案：C
暂无解析，请参考用户分享笔记 -
第2题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl)，编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是__________。
正确答案：
15【解析】本题考查函数调用中参数传递的知识。在VBA的函数调用时，参数有两种传递方式：传址传递和传值传递。如果在函数声明时没有说明传递类型，则默认为传址传递，即形参的结果会传递给实参。本题中形参均为传址传递，即a=x=3，b=y=5，c=z=10。但是在子程序里面对c重新赋值为c=a*b=15，这个值l5会回送给实参2，所以最后显示的值Z也就是l5。 -
第3题：
窗体上有一个名为Commandl的命令按钮，并有如下程序：
Private Sub Command 1_Click()
Dim a As Integer, b As Integer
a=8
b=12
Print Fun(a, b);a; b
End Sub
Private Function Fun(ByVal a As Integer, b As Integer)As Integer
a=a Mod 5
b=b、5
Fun＝a
End Function
程序运行时，单击命令按钮，则输出结果是
A）3 3 2
B）3 8 2
C）8 8 12
D）3 8 12
正确答案：B
-
第4题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
正确答案：
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。 -
第5题：
在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：
正确答案：
15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。