在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Private Sub Commandl_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n As In

admin2021-06-03  39

问题 在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:
Private Sub Commandl_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 mn=n—m
Loop
Loop
f=m
End Function
窗体打开运行后,单击命令按钮,则消息框的输出结果是(     )。

选项 A、6
B、8
C、4
D、2

答案A

解析 本题命令按钮的单击事件是使用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。
转载请注明原文地址:https://kaotiyun.com/show/z6vp777K
0

最新回复(0)