230问答网 > VB问题：想做一个“获取指定目录下所有文件夹名称和路径”（包含子目录）的功能

VB问题：想做一个“获取指定目录下所有文件夹名称和路径”（包含子目录）的功能

2024-11-23 13:26:52

推荐回答（2个）

回答1：

要想获得目录下所有文件名，得先得到一个所有文件的集合，可以用fso搞定。
引用 mircosoft scripting runtime，然后：
Dim fs As New FileSystemObject '定义fso对象和文件夹、文件对象
Dim fd As Folder
Dim fl As File
Set fd = fs.GetFolder("D:\_sys\") '创建文件夹对象
For Each fl In fd.Files '文件夹对象的Files属性是一个集合，包括目录下的所有文件对象
Print fl.Path & fl.Name '枚举每个文件，然后输出
Next
这只是一个文件夹，文件夹对象还有个属性，SubFolders，也是一个集合，代表目录下的所有子文件夹，可以参照上面的方法枚举。但是只有1级子文件夹，要遍历所有的话可以用递归的方式，LZ可以自己试试O(∩_∩)O

回答2：

fso对象了

VB问题： 想做一个“获取指定目录下所有文件夹名称和路径”（包含子目录）的功能

VB问题：想做一个“获取指定目录下所有文件夹名称和路径”（包含子目录）的功能