استخدام iris skin باستخدام (Imports Sunisoft.IrisSkin)

السلام عليكم ورحمة الله وبركاته
هذا مثال بسيط لتطبيق الثيم على فورمات محددة
اولا تحميل الاداة لفيجوال بيسك 2010 من IrisSkin4.zip
ثانيا تضاف عن طريق references
ثالثا استدعائها Imports Sunisoft.IrisSkin

رابعا

Dim skn As New Sunisoft.IrisSkin.SkinEngine
        skn.SerialNumber = "kUb2DF5pvGF3X9dKPFvIdkXQ0sE8LkAVp9fMme9wCnjZ+ArdRVlxKw=="
        skn.SkinFile = Application.StartupPath & "\Silver.ssk"
        skn.AddForm(Me)
        skn.AddForm(Form2)

المثال MAZEN.zip