با تکه کد زیر میتونید نام فولدر های مسیر معین شده رو نمایش بدید .
✨ نکات مهم:
• کد آماده و تستشده (1 قطعهکد)
• کار با کتابخانههای: File
• کپی و استفاده مستقیم در پروژه B4A
📚 کتابخانههای مورد نیاز:
File
(از مسیر Libraries در محیط B4A تیک بزنید.)
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانههای اعلامشده را تیک بزنید.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۷ شهریور ۱۴۰۵ - ۰۱:۱۷ |
| تعداد بازدید | ۳ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- تکهکد آماده B4A
- کاملاً رایگان
- کد تستشده با توضیح فارسی
- کتابخانه: File
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub ListFolders(dir As String)
Dim list_files As List
Dim lista_folders As List
lista_folders.Initialize
list_files=File.ListFiles(dir)
For i= 0 To list_files.Size -1
If File.IsDirectory(dir, list_files.Get(i))=True Then
lista_folders.Add(list_files.Get(i))
End If
Next
Return lista_folders
End Subمحصولات مشابه