كيف اعرف المجلد فارغ ؟

جرب هذا الكود

 'التحقق إن كان المجلد موجود
        If IO.Directory.Exists("D:\temb") Then
            'التحقق من وجود ملفات في المجلد أو لا
            If IO.Directory.GetDirectories("D:\temb").Length = 0 And IO.Directory.GetFiles("D:\temb").Length = 0 Then
                MsgBox("المجلد فارغ")
            Else
                MsgBox("المجلد غير فارغ")
            End If
            'في حالة عدم وجود المجلد
        Else
            MsgBox("المجلد غير موجود")
        End If