在窗体中添加—个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As Integer)As Integer Do while m＜＞n Do while m＞n m=m-n Loop Do While m＜n n=n-m Loop Loop f=m End Function 窗体打开并运行后，单击命令按扭，则消息框的输出结果是
题目
在窗体中添加—个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As Integer)As Integer Do while m＜＞n Do while m＞n m=m-n Loop Do While m＜n n=n-m Loop Loop f=m End Function 窗体打开并运行后，单击命令按扭，则消息框的输出结果是______。
A．2
B．4
C．6
D．8
相似考题
更多“在窗体中添加—个名称为Command1的命令按钮,然后编写如下事件代码:Private Sub Command1_Click() ”相关问题
-
第1题：
在窗体中添加～个名称为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。
-
第2题：
在窗体中添加一个名称为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。 -
第3题：
在窗体中添加一个名称为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。 -
第4题：
在窗体中添加一个名称为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。
-
第5题：
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：
打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。
正确答案：12
12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。 -
第6题：
（ 11 ）在窗体中添加一个命令按钮（名称为 Command1 ），然后编写如下代码：
Private Sub Command1_Click( )
Static b As Integer
b=b+1
End Sub
窗体打开运行后，三次单击命令按钮后，变量 b 的值是 【 11 】 。
正确答案：