[dasktop]

مرحبا

انا عملت مشروع بسيط لمعرفة اسماء الملفات التنفيذية في اي ملف مع المسار واستخدمت هاذا الكود


 

كود :

       Dim file2 As String() = Directory.GetFiles("C:\ProgramData", "*.exe")
       For Each b In file2
           TextBox2.Text += b + Environment.NewLine
       Next

مشكلة هاذا الكود لابد من كتابة المسار حتى يضهر جميع اسماء الملفات التنفيذية بصيغة exe

لاكن المطلوب كود مشابه له ويضهر جميع اسماء الملفات في كافة الملفات في الجهاز يعني اضهار شامل