当运行下列程序，单击窗体后，分别输入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 Dor=a Mod ba = bb = r Loop Until r=0 funl=a End Function
