主题：判断文件夹是否为空

 如题，如何判断一个文件夹是否为空？

判断文件个数和子目录个数

Dim folderPath As String = "C:\目标文件夹"
 
If FileSys.DirectoryExists(folderPath) Then 
    Dim files As List(Of String) = FileSys.GetFiles(folderPath)
    Dim subDirs As List(Of String) = FileSys.GetDirectories(folderPath)
    
    If files.Count = 0 AndAlso subDirs.Count = 0 Then 
        MessageBox.Show("文件夹为空！")
    Else 
        MessageBox.Show("文件夹不为空。")
    End If 
Else 
    MessageBox.Show("文件夹不存在！")
End If

 谢谢