获取最后一个子目录路径的列表-vb.net
我正在尝试获取最后一个子目录的路径列表 假设我的C驱动器上有一个名为“Test”的目录,如图所示 我只需要得到最后一个子目录的列表,上面用红色标记。结果应该是这样的: C:\test\1\a C:\test\1\b C:\test\1\C C:\test\1\d C:\test\2\a . . . . C:\test\5\d 就是这样获取最后一个子目录路径的列表-vb.net,.net,vb.net,.net,Vb.net,我正在尝试获取最后一个子目录的路径列表 假设我的C驱动器上有一个名为“Test”的目录,如图所示 我只需要得到最后一个子目录的列表,上面用红色标记。结果应该是这样的: C:\test\1\a C:\test\1\b C:\test\1\C C:\test\1\d C:\test\2\a . . . . C:\test\5\d 就是这样 感谢并致以最诚挚的问候在System.Io的帮助下,您可以执行此操作。请考虑以下代码: Dim di As DirectoryInfo = New Di
感谢并致以最诚挚的问候在System.Io的帮助下,您可以执行此操作。请考虑以下代码:
Dim di As DirectoryInfo = New DirectoryInfo("D:\folder")
Dim directories() As DirectoryInfo = di.GetDirectories("*", SearchOption.AllDirectories)
Dim ListOfEmptyDirectory As New List(Of String)
For Each dir As DirectoryInfo In directories
If dir.GetDirectories("*", SearchOption.AllDirectories).Count = 0 Then
ListOfEmptyDirectory.Add(dir.FullName)'Gives the List of Last sub directories in the given folder;
End If
Next
如果希望最后一个子目录列表为空,请按如下所示更改条件
If dir.GetDirectories("*", SearchOption.AllDirectories).Count = 0 And dir.GetFiles().Count() = 0 Then
ListOfEmptyDirectory.Add(dir.FullName)
End If
你试过什么吗?是的,我试过了,我得到了所有的列表目录,我只需要最后一级的子目录路径。我有这些有用的答案:但这并不完全是我需要的。告诉我们你试过什么。此外,还可以说第二个链接为您提供了一个答案,您只需要阅读答案代码正在做什么