افزودن نام فایلهای با فرمت Pdf موجود در یک پوشه به ListBox

[ali190]

با سلام و عرض خسته نباشید
دوستان چطور میتونم نام کلیه فایلهای با فرمت Pdf موجود در یک پوشه رو به یک لیست بکس اضافه کنم؟
ممنون میشم راهنماییم کنید
یاعلی

[Mr'Jamshidy]

خیلی ساده
یک نگاه به لینک زیر بنداز لینک (http://barnamenevis.org/showthread.php?285460-%D8%AC%D8%B3%D8%AA%D8%AC%D9%88-%DA%86%D9%86%D8%AF-%D9%81%D8%A7%DB%8C%D9%84-%D8%A8%D8%A7-%D9%BE%D8%B3%D9%88%D9%86%D8%AF-%D9%85%D8%AA%D9%81%D8%A7%D9%88%D8%AA)

[محسن واژدی]

سلام علیکم
دستور زیر نیز اینکار را انجام میدد

Private Sub Command1_Click()

Dim fPath As String

fPath = Dir("C:\Windows\*.exe")

Do While fPath <> ""
List1.AddItem fPath
fPath = Dir()
Loop

End Sub


" fPath = Dir("C:\Windows\*.exe")" را به نسبت نیازتون تغییر دهید

موفق باشید