[samielkholy]

أخواني الأعزاء أرجو مساعدتي في معرفة كود ملئ ListView بأسماء النماذج Forms الموجودة ببرنامجي.

ولكم جزيل الشكر
========
سامي الخولي
========

[ahmed salam]

السلام عليكم و رحمة الله و بركاته
اخي الكريم النماذج الموجودة في برنامجكك غير متغيرة " ثوابت "
اي لست بحاجة لكود لملئها فهي لن تتغير
اقصد يمكنك ملئها يدويا
اذا اسأت فهم الامر ارجو التوضيح

لا تنسوني من صالح دعائكم
السلام عليكم ورحمة الله و بركاته

[samielkholy]

وعليكم السلام ورحمة الله وبركاته
شكرا أخي الكريم على ردك
أعلم ان من السهل ملئ اسماء النماذج يدويا مادامت ثابته بنفس البرنامج
ولكني اريد عمل نموذج للصلاحيات يظهر فيه اسماء النماذج حتى يمكن للعميل وضع صلاحيات مستخدمي برنامجه آليا
وكنت اود ان يحتوي نموذج الصلاحيات هذا على طريقة آلية لإظهار اسماء النماذج ويكون فورم جاهز عندي لأستخدمه لكافة برامجي المستقبلية وكما تعلم اسماء النماذج مختلفة من برنامج لأخر
وشكرا لتعاونكم

[Osama_Ghareeb]

كود :

Dim S As String = "My Forms : " & vbNewLine
        [COLOR=#ff0000]For Each PropertyObj As Reflection.PropertyInfo In My.Forms.GetType.GetProperties()
[/COLOR]            S += ([color=#ff0000]PropertyObj.Name[/color])
            S += (vbNewLine)
        [COLOR=#ff0000]Next
[/COLOR]        MsgBox(S)

[samielkholy]

شكرا أخ اسامة
سوف اجرب الكود وان شاء الله اوافيك بالنتيجة