هل يمكن عرض محتويات القرص ؟

استخدم ادوات Dir و File افضل من ادراج النتائج في Listbox .

أسرع طريقة واسرع هي:

Private Sub Dir1_Change()
File1.Path = Dir1.Path
List1.Clear
For x = 0 To File1.ListCount - 1
		List1.AddItem File1.List(x) 'Add to second list
Next x
End Sub

لكن اذا كان المجلد هذا يحتوي على مجلدات فرعيه .. فلن يعرض سوى ملفات ويتجاهل المجلدات الفرعيه الموجوده داخل مسار المجلد المحدد بــ Dir1.Path .. استخدم الــ File و الــ Dir مباشرتا ادق واوضح حتى يمكنك التنقل بين المجلدات الفرعيه وعرض محتويات ملفاته .. اما ادراجها في Listbox فستكون للعرض فقط حتى المسار الفعلي لن تستطيع معرفته .