10精币 求如何取制定文件夹下全部文件名并加入到编辑框中

280674368

我是这样写的，wjm是用来记录文件名称的，文件数是记录总共有多少个文件的，编辑框3是显示文件数目的，编辑框1用来加入文件名，想取的文件夹是取特定目录 (11) ＋ “temporary folder\“

想要问的是：
我这个到最后显示文件数正确，但是编辑框1里一个文件名都没有。我确定文件夹里有文件。
如果写的不对请提供例程

文件数=0
wjm ＝ 寻找文件 (取特定目录 (11) ＋ “temporary folder\*.*”, )
判断循环首 (wjm ≠ “”)
    wjm ＝ 寻找文件 (, )
    编辑框1.加入文本 (wjm ＋ #换行符)
    文件数 ＝ 文件数 ＋ 1
判断循环尾 ()
编辑框3.内容 ＝ 到文本 (文件数)

三千

  编辑框1.加入文本 (wjm ＋ #换行符)
    wjm ＝ 寻找文件 (, )
      换位置

Cand

站给位子 去写 不一定能写对

桃桃

[e].版本 2
.支持库 PBShell

.子程序 __启动窗口_创建完毕
.局部变量 文件数, 整数型
.局部变量 wjm, 文本型

文件数 ＝ 0
wjm ＝ 寻找文件 (取特定目录 (11) ＋ “temporary folder\*.*”, )
.判断循环首 (wjm ≠ “”)
    .如果真 (wjm ≠ “”)
        编辑框1.加入文本 (wjm ＋ #换行符)
        文件数 ＝ 文件数 ＋ 1
    .如果真结束
    wjm ＝ 寻找文件 (, )
.判断循环尾 ()
编辑框3.内容 ＝ 到文本 (文件数)

wjm ＝ 寻找文件 (取运行目录 () ＋ “\运行日志\*.*”, )
.判断循环首 (wjm ≠ “”)
    .如果真 (wjm ≠ “”)
        编辑框1.加入文本 (wjm ＋ #换行符)
        文件数 ＝ 文件数 ＋ 1
    .如果真结束
    wjm ＝ 寻找文件 (, )
.判断循环尾 ()
编辑框3.内容 ＝ 到文本 (文件数)
[/e]

myeang77

楼上正解{:3_244:}

Cand

这个。。。。

Cand

下面那个是递归法的我去把例程挪过来了