新手，想做一个遍历所需要的文件夹下指定文件并另存到指定文件夹下，在运行到id（l）=filename时就出现了下标越界错误。请问一下大家，id是我新定义的数组，没有设定上下界，在这种情况下为什么会出现这个错误，该如何改正？ 其他数组在调试过程中看到可以按要求赋值。  请大家帮忙看看，十分感谢

先用 DIR 找一遍，同时计数，
然后再用 DIR 重找一遍，这次保存文件名。

要么使用 文件列表控件 。

------------------
好吧，你两边问，我两边回答了你。

感谢回复呢，就是我比较笨试了一晚上，都没成功。。QAQ

好吧
'第一遍，专用于计数
l=0
filename=dir(...... ) '图片版的代码不愿看，就在这里没办法复制内容

do while filename=""
l=l+1
filename=dir
loop
redim cid(i) '重定义数组

'第二遍，保存文件名
l=0
filename=dir(...... ) '图片版的代码不愿看，就在这里没办法复制内容

do while filename=""
cid(l)=filename
l=l+1
filename=dir
loop