[填空题] 当运行下列程序，单击窗体后，分别输入72和24，信息框上显示的结果是。Private Sub Form

[填空题] 当运行下列程序，单击窗体后，分别输入72和24，信息框上显示的结果是 。 Private Sub Form

[填空题] 当运行下列程序，单击窗体后，分别输入72和24，信息框上显示的结果是 【13】 。

Private Sub Form_Click()

Dim x As Integer，y As Integer

x=Val(InputBox("输入整数72"))

y=Val(InputBox("输入整数24"))

z=fun1(x，y)

MsgBox Str(Z)

End Sub

Private Function funl(ByVal a As Integer， ByVal b As Integer)As Integer

Do

r=a Mod b

a = b

b = r

Loop Until r=0

funl=a

End Function

正确答案：

X解析：[分析]： 由“欧几里德”求最大公约数的算法可知，当余数r为零时，a为a和b的最大公约数。72和24的最大公约数为6。“Mod”运算符用来对两个数做除法运算并且只返回余数。