سورس رایگان vb6

[yase-sepid]

---

اول این کد رو در جنرال فرمی که میخواهیداجزاش به شکل فرمهای اکس پی در بیاد کپی کنید

کد:

Option Explicit Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long Private Sub Form_Initialize() InitCommonControls End Sub

بعد نوت پد رو اجرا کنید و کدهای زیر رو توش کپی کنید

کد:

<xml> <assembly> <assemblyIdentity> <description>Ein XP Test mit Visual Styles</description> <dependency> <dependentAssembly> <assemblyIdentity> </dependentAssembly> </dependency> </assembly>

بعد از منوی فایل گزینه سیو از رو انتخاب کنید و در این پنجره کادر انتخابی که کنارش نوشته

Encoding

رو

utf-8

تنظیم کنید و نام فایل رو به اسم برنامه خودتون با پسوند

.exe.manifest

ذخیره کنید فقط به یاد داشته باشین همین فایلی رو که الان ساختین رو در کنار فایل اجرایی برنامه بذارین
برای این کار باید یک فایل اجرایی واسه برنامتون از قبل ساخته باشید
فراموش نشه که این فایلی رو که ساختین همیشه باید در کنار فایل اصلی برنامه باشه منظور از برنامه اجرایی همون برنامه ای که پسوند ای ایکس ای (exe) داره
اگر هم موفق نشدین یه برنامه نمونه هم میتونید از اینجا دانلود کنید که فقط 5 کیلو بایت حجم داره

http://www.devtrain.de/data/Alle/xpstyle.zip
موفق باشید