private sub command1_click()
   dim m as integer , n as integer
   m=1
for n = 1 to 15
   m= m*n
   if m >15 then
exit for
else
n=n+1
 end if
next n
print m;n
end sub
程序运行后输出结果为15  7，不太明白为什么？求解释一个这个程序！

输出结果应该是105,7吧。

我怎么算的m=24

你自己运行一下程序，在 next n 前面再加一个行 print m;n
看一下前面四次输出的结果就应该能明白

按代码顺序执行:
m=1、n=1、m=1、n=2(n=n+1)、n=3(next n)、m=3、n=4(n=n+1)、n=5(next n)、m=15、n=6(n=n+1)、n=7(next n)、m=105

(next n)也加一，没想到。知道了，前几天还为这个问题迷惑呢。
for n=1 to 5
n=6
next n
我原来以为执行5次循环

答案是15,7

好的，谢谢~

答案有问题！应该是105,7

厉害