主题：[求助]这样的进度条如何实现？

我要复制一个文件夹的所有图像文件（文件多而且大），在开始复制时我打开一个窗口：如下图

此主题相关图片如下：2012-6-5 19-36-06.png

窗口名为“等待窗口” 窗口类型：独立

ProgressBar1 的样式设置为 Marquee

拷贝文件时的代码为：

            Forms("等待窗口").open()
            filesys.copydirectory(“d:\照片”,ProjectPath & "Attachments\",True)
            Forms("等待窗口").close()

窗口打开后，进度条不滚动！有办法解决吗？

窗口类型为 “模式”的时候可以滚动，但程序也停止运行了！