斩月文件搜索模块支持整词

.子程序 斩月_列出所有子目录, 文本型, 公开, c:\*"，搜索各分级子目录，包括多重分级的目录,结果以"|"分隔
.参数 目录, 文本型, 可空,, 注：要加通配符*。如“c:\*”
.参数 欲列出文件的属性, 整数型, 可空,, 可以被省略。参数值可以为以下常量值或其和： 1、#只读文件； 2、#隐藏文件； 4、#系统文件； 16、#子目录； 32、#存档文件；55、#所有文件(包括子目录)。通过将这些常量值加起来可以一次设置多个文件属性。如果省略本参数，默认为搜寻除子目录外的所有文件。

.如果真 (位与 (data.dwFileAttributes, 欲列出文件的属性) ＝ 0 或 是否为空 (欲列出文件的属性) 且 位与 (data.dwFileAttributes, 16) ≠ 0)
到循环尾 ()
.如果真结束
wjming ＝ 字节数组_到文本 (data.cFileName)
.如果真 (wjming ≠ “.” 且 wjming ≠ “..” 且 文本_取长度 (wjming) ＞ 0)
liebiaoo ＝ 文本_取左边 (目录, 文本_取长度 (目录) － 1) ＋ wjming
加入成员 (列出的文件名, liebiaoo)
kj ＝ 斩月_列出所有子目录 (liebiaoo ＋ “\*”, 16)
.如果真 (文本_取长度 (kj) ＞ 0)
列出的 ＝ kj ＋ “|” ＋ 列出的
.如果真结束
到循环尾 ()