![[填空题] 下列函数过程的作用是计算x和y的最大公约数。请填空。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, Res](http://www.mshxw.com/aiimages/31/255732.png "[填空题] 下列函数过程的作用是计算x和y的最大公约数。请填空。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, Res")
[填空题] 下列函数过程的作用是计算x和y的最大公约数。请填空。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, Result As Integer x = InputBox (“请输入第一个数”) y = InputBox (“请输入第二个数”) Result =______Print x; "和"; y; "的最大公约数为: "; Result End Sub Private Function GYS (ByVal A As Integer, ByVal B As Integer) Dim T As Integer T = A Mod B Do While ______ A = B B = T T = A Mod B Loop ______ End Function
参考答案：
GYS (x，y) T＜＞0 GYS=B问题解析:
解析无
