请问pb怎么遍历文件夹（包括子文件夹）
我做了个循环函数不得行
参数是 powerobject ap_listbox ； string as_path_t
lb_files_o 是实例变量

long i
ListBox lb_files_t
lb_files_t = ap_listbox
lb_files_o.reset()


if lb_files_t.totalitems() > 0 then
for i = 1 to lb_files_t.totalitems()
if lb_files_t.text(i) = '[..]' then continue
if pos(lb_files_t.text(i), '[') = 1 then
as_path_t = as_path_t + '\' + mid(lb_files_t.text(i),2,len(lb_files_t.text(i)) - 2) +"\*.*"
lb_files_o.dirList(as_path_t , 16)
wf_dirlist(lb_files_o,as_path_t)
else
lb_files1.addItem(lb_files_t.text(i))
end if
next
end if


[解决办法]
DirList()就可以啊
你查查这个函数的用法
[解决办法]
先将每个dirlist存入数组,再遍历下一下列表
可以考虑写个递归函数
[解决办法]
用listbox控件或着 win32 api FindFirstFile