01-03-19, 10:04 PM
(آخر تعديل لهذه المشاركة : 01-03-19, 10:11 PM {2} بواسطة sniperjawadino.)
والله أعذرني على ما أتعبتك فيه لمساعدتي
فقط أريد أن تفهم قصدي
وهو عدم معرفتي باسم الفورم حتى أكتبه هل هو Form1 أو Form2 أو Form3 ......
لذلك أريد وضع إسم الفورم في متغير
مشروعي الصغير هو مثل كيبورد
فعند الضغط على أي زر يجب أن أعرف اسم الفورم المفتوح و أضعه في الكود الذي كتبته لي
لقد ساعدني أحد الأخوة جزاه الله كل خير في إيجاد الكود المناسب في منتدى نقطة التطور
حتى يستفيد الإخوة
جزاك الله كل خير على مساعدتك أخي [b]elgokr[/b]
فقط أريد أن تفهم قصدي
وهو عدم معرفتي باسم الفورم حتى أكتبه هل هو Form1 أو Form2 أو Form3 ......
لذلك أريد وضع إسم الفورم في متغير
مشروعي الصغير هو مثل كيبورد
فعند الضغط على أي زر يجب أن أعرف اسم الفورم المفتوح و أضعه في الكود الذي كتبته لي
لقد ساعدني أحد الأخوة جزاه الله كل خير في إيجاد الكود المناسب في منتدى نقطة التطور
حتى يستفيد الإخوة
كود :
Dim x0 As Form = Form1 ' متغير للفورم
Dim x1 As Panel = Form1.Panel1 ' متغير للبانل
'Dim obj As Object() = {x0, x1} ' متغير صفيف من نوع اوبجكت يجمع الاثنين
For Each c0 As Control In x1.Controls ' سياخذ لفه ع جميع الادوات داخل البانل
MsgBox(c0.Name)
Next
'Dim f As Form = DirectCast(obj(0), Form)
'MsgBox(f.Name)
'Dim p As Panel = DirectCast(obj(1), Panel)
'MsgBox(p.Name)جزاك الله كل خير على مساعدتك أخي [b]elgokr[/b]

