VB怎样快速获取当前文件夹下的所有文件的路径（包括子目录）

有两种方法：

1、使用DIR递归，不过这是微软明确不推荐的

2、最快但不太正规的

使用 Shell "cmd /k dir c:\windows /s/b/a >>d:\jgtxt"

c:\windows 目标文件夹，当前文件夹为 apppath，你可以根据要求生成命令字符串

d:\jgtxt 为临时文件

执行这行后再读取临时文件即可。极快！

命名空间:SystemWindowsForms

ApplicationStartupPath 属性(返回String)

获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称。

ApplicationExecutablePath 属性(返回String)

获取启动了应用程序的可执行文件的路径，包括可执行文件的名称。

要想获得目录下所有文件名，得先得到一个所有文件的集合，可以用fso搞定。

引用 mircosoft scripting runtime，然后：

Dim fs As New FileSystemObject '定义fso对象和文件夹、文件对象

Dim fd As Folder

Dim fl As File

Set fd = fsGetFolder("D:\_sys\") '创建文件夹对象

For Each fl In fdFiles '文件夹对象的Files属性是一个集合，包括目录下的所有文件对象

Print flPath & flName '枚举每个文件，然后输出

Next

这只是一个文件夹，文件夹对象还有个属性，SubFolders，也是一个集合，代表目录下的所有子文件夹，可以参照上面的方法枚举。但是只有1级子文件夹，要遍历所有的话可以用递归的方式，LZ可以自己试试O(∩_∩)O

vb语法不熟，只能说下思路。都是使用winapi

资源管理器有一个显示路径的编辑框，先用工具，如 Spy4Win 获得资源管理器的类名，和显示路径的那个edit（Win10系统和xp系统应该不一样）

用winapi GetForegroundWindow 获得系统当前激活的窗口句柄

然后通过 GetClassName 获得该句柄的类名，再判断是否是资源管理器一样的类名

如果一样，通过 FindWindowEx 查找 edit 的句柄，最后GetWindowText获得路径

以上就是关于VB怎样快速获取当前文件夹下的所有文件的路径（包括子目录）全部的内容，包括:VB怎样快速获取当前文件夹下的所有文件的路径（包括子目录）、在VB.NET中如何取得当前目录的路径、VB问题： 想做一个“获取指定目录下所有文件夹名称和路径”（包含子目录）的功能等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！