VBS为什么不弹出结果对话框？

Question

代码如下：

dim s,a,b,c,d,e,f
s="最大公因数计算器"
a="请输入第一个数"
b="请输入第二个数"
c="结果："
d=inputbox(a,s)
e=inputbox(b,s)
if d/e=int(d/e) then
msgbox c&e
else
if e/d=int(e/d) then
msgbox c&d
else
do
f=d-1
if d/f=int(d/f) and e/f=int(e/f) then
msgbox c&f
exit do
end if
Loop
end if
end if

输入4、8这样的数还能弹出结果对话框，但输9、6就不行了，怎么解决？谢谢

Answer 1

if d mod e = 0 then
...
别的类似