vb编程求最小公约数

来源：百度知道 编辑：UC知道 时间：2024/05/30 02:09:54
程序内容我知道,但是不明白循环语句为什么那样写,麻烦解释一下

是辗转相除法吧

把你的问题放到 百度知道》电脑网络》程序设计》VB 栏目
即可得到迅速回答。

Private Sub Command1_Click()
Dim a, b, i, x As Integer
a = 12: b = 27: x = 100
Do While (x > 0)
x = b Mod a
b = a
a = x

Loop
Print b

End Sub