نشان دادن ليست فايلهاي يك پوشه در يك ليست باكس

[morynf]

با سلام و درود خدمت اساتيد گرامي
مي خواستم بدونم چگونه مي شود ليست فايلهاي درون يك پوشه را در يك ليست باكس نشان داد .
با تشكر

[morynf]

دوستان و سروران گرامي راهكار يا نمونه اي ندارند كه كمك كنه يكم فوريه ممنون مي شم كمك كنيد .
با تشكر

[mazoolagh]

http://www.blueclaw-db.com/listbox-directory.htm

[morynf]

دوست گرامي Mazoolagh با تشكر از كمك تان ، من فايل پيوست را درست كردم ولي نمي دانم چگونه سورس ليست باكس را با اين اطلاعات تغيير بدهم بطوري كه ليست فايل ها يا پوشه ها درون ليست باكس قرار بگيرد .
لطفا در صورت امكان فايل پيوست را اصلاح فرمائيد . با تشكر

[mazoolagh]

1- باید نوع row source type لیست باکس رو به value list تغییر بدین (در قسمت طراحی فرم properties لیست باکس بخش data)

2- در مرجعی که معرفی کردم از روتین سورت به نام quicksort استفاده شده که سورسش مستقیم در اون صفحه نیست و بهش لینک داده شده.
http://www.blueclaw-db.com/quick-sort.htm
اگر میخواهید که لیست فایلهاتون مرتب باشه باید اون کد رو هم باید به برنامه تون اضافه کنین در غیر اینصورت خطی رو که از این کد استفاده میکنه حذف کنین:

QuickSort MyArray, 1, i - 1

3- اسم درایو و مسیر باید درون "" باشه

Private Sub Form_Open(Cancel As Integer)

Call FillList(cmbList, "d:\")

End Sub