怎么样让msgbox只弹出一次，我做的是循环累加A的值，当A到5，弹出msgbox
问题A＝5时，它弹出msgbox，但你关闭他后，循环累加又到了A＝5，又会弹出msgbox
我只想它弹出一次，当关闭它后，再不弹出
这个怎么实现？

dim isOpen as boolean
isOpen = false

for i = 1 to 5
if i=5 then
if not isOpen then
msgbox "aa"
isOpen = true
end if
end if
next

我咋就没想到列，呵呵，经验问题，我已经实现了，不过又多加了一个timer，应该还是你的方法好些，谢谢

小技巧

for i = 1 to 5
if i=5 then
msgbox "aa"
Exit Sub
end if
next i
这也可以啊

楼上的兄弟，你没有理解楼主的意思，他是说在程序的运行整个过程只让Msgbox弹出一次！！！
按照你的意思，又何必加一个exit sub 呢？多此一举！

呵呵，版主的是正解啊！

not isOpen

怎么理解啊>?是不是英文意思."不是 ISOPEN"的意思啊?

FOR NEXT语句还是不太会用?

Not 就是 非 的意思 也就是取反. 只对bool类型的值操作
循环语句不会用取看帮助...

对,是我搞错了