private sub command1_click()
dim X%,y%，z%
x=242:y=44
z=x*y
do until x=y
if x>y then x=x-y else y=y-x
loop
print x,z/x
end sub
请帮我解释一下这段代码为什么是请最小公倍数和最大公约数的