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

admin2021-06-03  22

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

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

答案C

解析 本题考查VBA程序设计的知识。当调用函数时,形参m=24,n=18:然后进入循环,由于m>n,所以执行m=m-n,m的值变为6;第2次循环时由于m
转载请注明原文地址:https://jikaoti.com/ti/UT90FFFM
0

最新回复(0)