一、程序改错题(要求,改错题,改正的部分以红色显示)程序功能:计算两个数的最大公约数.程序中有一行有错误,改正错误,使程序能输出正确结果Private Sub Command1_Click() Print fun(1107,2889) End Su

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/05 06:47:47

一、程序改错题(要求,改错题,改正的部分以红色显示)
程序功能:计算两个数的最大公约数.程序中有一行有错误,改正错误,使程序能输出正确结果
Private Sub Command1_Click()
Print fun(1107,2889)
End Sub
Private Function fun(u,v) As Integer
While (v 0)
t = u Mod v
u = v
v = t
Wend
fun = v
End Function

首先,我只学过C
Private Sub Command1_Click() //定义私有函数Sub
Print fun(1107,2889) //打印函数后的结果 并传参数 (1107,2889)
End Sub //结束Sub
Private Function fun(u,v) As Integer //定义私有函数fun(u,v) 返回整形int
While (v 0) //while 循环 当 v不等于 0 的时候就循环
t = u Mod v //Mod 为取余函数 1107%2889 余数为t=0
u = v //把v的值给u u=2889
v = t // v=0
Wend //wend 关闭循环
fun = v //返回v
End Function //结束 函数 fun
你这个程序算法就不对...建议你重新再写过...这个也不是改一句两句就能通过的...