帮忙讲一个DO LOOP循环的题,循环结构不太懂,有窍门的哥哥姐姐帮忙一下,告诉点窍门
帮忙讲一个DO LOOP循环的题,循环结构不太懂,有窍门的哥哥姐姐帮忙一下,告诉点窍门
private sub command1-click()
Dim x%,y%,Z%
x=242；y=44,
z=x*y
Do until x=y
If x＞yThen x=x-y Else y=y-x
Loop
Print x,z/x
End Sub
private sub command1-click()
Dim x%,y%,Z%
x=242；y=44,
z=x*y
Do until x=y
If x＞yThen x=x-y Else y=y-x
Loop
Print x,z/x
End Sub
赞
可能相似的问题
-
1年前11个回答
-
1年前6个回答
-
1年前1个回答
-
1年前1个回答
-
1年前1个回答
-
1年前1个回答
你能帮帮他们吗