[填空题] 当运行下列程序，单击窗体后，分别输入72和24，信息框上显示的结果是 【13】 。 Private Sub Form_Click()Dim x As Integer，y As Integ

[填空题] 当运行下列程序，单击窗体后，分别输入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