在VB.net中，如何遍历指定路径下的文件夹并把文件夹名存储在数组中？

来源：百度知道 编辑：UC知道 时间：2024/06/22 06:10:45
rt
我只需要路径下的第一层目录，不需要得到路径下文件夹中包含的文件
有没有更简单的方法？

给你一个提示吧！呵呵，剩下的要自己思考哦！

Path：是初始目录的路径

Private Sub WriteArray(ByVal Path As String)
'写入数组代码在这里，直接将Path写到数组就行了。
Dim dir As New IO.DirectoryInfo(Path)
For Each d As IO.DirectoryInfo In dir.GetDirectories
WriteArray(d.FullName) '递归
Next
End Sub

如果子目录较多那么递归会比较费时间，在调用递归前加入application.doevent就行了，这样在应对大递归时不会死机。
至于数组嘛使用 arraylist 最好了。

回答补充：
把递归去掉就行了啊！