没有堆栈如何"全部展开"

像资源管理器,肯定有一个功能是"展开所有目录"的.我猜,要实现这个功能要用到堆栈,即HASCHILD== 1就PUSH一下,HASCHILD完了后就一个个POP回来.
那么,如果没有了堆栈功能(我看OFFICE的宏编程就像是没有堆栈这功能了),怎么实这个"展开全部"的功能?谢谢!