你在miCount = miCount + 1 If miCount = 3 Then Me.Hide 上加三个断点,然后用f8执行,看看有没按你的要求执行就知道了。另外me.hide 可以改为end结束程序。