填空题

当下列程序运行,单击窗体后,分别输入72和24,信息框上显示的结果是______。
Private Sub Form_Click( )
Dim X As Inte9er, y As Integer
x=Val(InputBox("输入整数72"))
y=Val(InputBox("输入整数24"))
z=funl(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
h=r
Loop Until r=0
funl=a
End Function

【参考答案】

X
热门 试题