Vb.net 如何在不知道特定目录名的情况下检查是否存在任何目录，而只是检查文件夹可能所在的文件夹

在vb.net中，如何检查目录中是否存在任何目录

---

我需要知道c:\windows目录中是否有一个文件夹（不知道其中是否有任何目录）。

那么您想检查目录中是否有子目录吗？很公平：

Dim hasSubDirectories as Boolean = My.Computer.FileSystem.GetDirectories(parentDir).Count > 0

---

那么，您想检查一个目录中是否有子目录？很公平：

Dim hasSubDirectories as Boolean = My.Computer.FileSystem.GetDirectories(parentDir).Count > 0

---

可以在System.IO命名空间内使用DirectoryInfo类

例如：

    Dim path As String = "C:\Windows"
    Dim directoryInfo As New DirectoryInfo(path)

    Dim dirInfos() As DirectoryInfo = directoryInfo.GetDirectories()

    If (dirInfos.Length > 0) Then
        ' you have directories, do what you want
    End If

    'or iterate over directories

    For Each dirInfo As DirectoryInfo In dirInfos
        ' do something with each directory
    Next

---

可以在System.IO命名空间内使用DirectoryInfo类

例如：

    Dim path As String = "C:\Windows"
    Dim directoryInfo As New DirectoryInfo(path)

    Dim dirInfos() As DirectoryInfo = directoryInfo.GetDirectories()

    If (dirInfos.Length > 0) Then
        ' you have directories, do what you want
    End If

    'or iterate over directories

    For Each dirInfo As DirectoryInfo In dirInfos
        ' do something with each directory
    Next

---

与其像mattbasta建议的那样使用特定于VB的函数，不如使用

System.IO.Directory

类，它是BCL的一部分，任何其他.NET开发人员都会很熟悉

Dim hasSubDirectories = System.IO.Directory.GetDirectories(parentPath).Length > 0

---

与其像mattbasta建议的那样使用特定于VB的函数，不如使用

System.IO.Directory

类，它是BCL的一部分，任何其他.NET开发人员都会很熟悉

Dim hasSubDirectories = System.IO.Directory.GetDirectories(parentPath).Length > 0

---

问题是我不能转换成字符串

    Dim path As String = "..\..\..\Tier1 downloads\CourseVB\"


    If countNumberOfFolders > 0 Then 'if there is a folder then


        ' make a reference to a directory
        Dim di As New IO.DirectoryInfo(path)
        Dim diar1 As IO.DirectoryInfo() = di.GetDirectories()
        Dim dra As IO.DirectoryInfo

        'list the names of all files in the specified directory
        For Each dra In diar1

            Dim lessonDirectoryName() As Lesson
            lessonDirectoryName(0).lessonName = dra

        Next

---

'课程是一个对象，lessonName是string类型的属性。如何将directoryInfo转换为字符串？

问题是我无法转换为字符串

    Dim path As String = "..\..\..\Tier1 downloads\CourseVB\"


    If countNumberOfFolders > 0 Then 'if there is a folder then


        ' make a reference to a directory
        Dim di As New IO.DirectoryInfo(path)
        Dim diar1 As IO.DirectoryInfo() = di.GetDirectories()
        Dim dra As IO.DirectoryInfo

        'list the names of all files in the specified directory
        For Each dra In diar1

            Dim lessonDirectoryName() As Lesson
            lessonDirectoryName(0).lessonName = dra

        Next

---

'课程是一个对象，lessonName是string类型的属性。如何将directoryInfo转换为字符串？

请看下面的帖子，我已经给出了答案，以便您可以看到我使用的新代码。我的问题是我不能将directoryInfo转换成字符串。请看下面的帖子，我做了一个答案，这样你就可以看到我使用的新代码了。我的问题是我不能将directoryInfo转换成字符串。请看下面的帖子，我做了一个答案，这样你就可以看到我使用的新代码了。我的问题是我不能将directoryInfo转换成字符串。请看下面的帖子，我做了一个答案，这样你就可以看到我使用的新代码了。我的问题是我不能将directoryInfo转换成字符串。请看下面的帖子，我做了一个答案，这样你就可以看到我使用的新代码了。我的问题是我不能将directoryInfo转换成字符串。请看下面的帖子，我做了一个答案，这样你就可以看到我使用的新代码了。我的问题是，我无法将directoryInfo转换为stringuse dra.FullName（用于目录的完整路径）或dra.Name（用于名称）。使用dra.FullName（用于目录的完整路径）或dra.Name（用于名称）。根据作者提交的代码，我将此标记为家庭作业。看起来这是一级训练@根据作者提交的代码，我将把它标记为家庭作业。看起来这是一级训练@垫子