اولا : اشكر المشرفي المنتدي واعضاءه الفعالين
ثانيا : خطوات نفعيل win XP Style بالكود
1 - اجعل خاصية FlateStyle = System في كل ادوات المشروع
2 - اضف الكود التالي فى الفورم الرئيسة بالمشروع يعني اول فورم بتتفتح لما بتشغل المشروع
[shared Sub Main()
Application.EnableVisualStyles()
Application.DoEvents()
Application.Run(New frmMainForm)
طبعا frmMainForm الى في السطر السابق هاتكون بالنسبالك اسم الفورم الرئيسة بالمشروع يعني اول فورم بتتفتح لما بتشغل المشروع
End Sub]
أو طريقة اخرى
اعمل Module واكتب فيها الكود التالي
[/Public Sub Main()
'make this XP style (make sure to set FlatStyle to system on all controls)
System.Windows.Forms.Application.EnableVisualStyles()
Application.DoEvents()
Application.Run(New Form1)]
طبعا Form1 الى في السطر السابق هاتكون بالنسبالك اسم الفورم الرئيسة بالمشروع يعني اول فورم بتتفتح لما بتشغل المشروع
ثم اجعل ال Start Up Opject بتاعت المشروع هي Sub Main
جربو الكود يا جماعة وقولولي النتيجة
واتمنى الفائدة للجميع
وارجو الدعاء