كود سهل :
Dim a As Icon
a = Drawing.Icon.ExtractAssociatedIcon("c:\windows\explorer.exe")
pic.Image = a.ToBitmap
(h) (h) (h) (h) (h)
من مواضيعي :
تعلم كيف تفتح ملف ببرنامجك والبرنامج مو شغال
مجموعة كبيرة من خواص System.Management
تفعيل ستايل ويندوز أكس بي على الفيجوال 2003
تعلم أختراق أقوى كلمة سر في الكمبيوتر
درس لتعليم كيفية دمج الملفات في ملف حاضن
تعلم طريقة وضع صورة ونص في نفس الملف, درس رائع
وضع ملف داخل الملف التنفيذي وأستخراجه
----------------------------------------------------------------------------------------------------
))))))))))))))))))))))))))))))))))(((((((((((((((((((((((((((((((((
--------------------------
If You.LoveArabTeam = True
Msgbox ("Welcome")
Else
Msgbox ("YouAreLoser")
End if