问题
单项选择题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click()
MsgBox f(24，18)
End Sub
Public Function f(m As Integer，n As Integer)As Integer
Do While in＜＞n
Do While in＞n
m=m-n
Loop
Do While In＜n
n=n-m
Loop
Loop
f=m
End Function
窗体打开运行后，单击命令按钮，则消息框的输出结果是______。
A．2
B．4
C．6 D．8
答案
参考答案：C
解析： 题目中命令按钮的单击事件是使用MsgBox显示过程f的值。在过程f中有两层Do循环，传入参数m=24，n=18，由于m＞n所以执行m=m-n=24-18=6，内层第1个Do循环结束后m=6，n=18；此时m小于n，所以再执行n=n-m=18-6=12，此时m=6，n=12；再执行n=n-m后m=n=6；m＜＞n条件满足，退出循环，然后执行f=m的赋值语句，即为f=m=6。