[sniperjawadino]

السلام عليكم


لدي إستفسار بسيط

كيف يمكنني تغيير اسم Button موجودة في UserControl وذلك عبر كتابة الكود في  UserControl  آخر

فما ألاحظه هو عدم ظهور أدوات UserControl  عند استدعائها من  UserControl  آخر

[silverlight]

الموضع سهل بس حاول ترفع مثال بسيط للتعديل عليه

[الوادي]

أنت لم تشر إلى الاسم الموجود في الفورم والذي عادة تنتهي بترقيم

يعني لو كان اليوزركنترول المصمم اسمه UserControl_vente
فعند وضع نسخه منه على الفورم سيكون اسمه UserControl_vente1 لاحظ رقم واحد (إذا كان أول واحد موضوع في الفورم)
فعليه يكون التعامل مثل

PHP كود :

UserControl_vente1.Button1.Text = "إبدأ" 


[sniperjawadino]

شكرا أخي الوادي
لكن والله ليس الأمر كما شرحت
أضن أني لم أفلح في توصيل الفكرة

أنا أريد عمل مثل   Form1.Button1.text = Hello

لكن مع  Usercontrol وليس   Form

هذا مثال بسيط

[الوادي]

ما هو نفس الشي.

مو انت تقصد هذا

PHP كود :

Panel1.Controls.Clear()
Dim frm As New UserControl1
frm.Button1.Text = "Hello"
Panel1.Controls.Add(frm)
Panel1.Visible = True 


[sniperjawadino]

نعم أخي هذا ما أقصد
لكن هذا الكود أستخدمه للنداء على UserControl داخل Panel

هل يمكنني استخدام هذا الجزأ فقط

Dim frm As New UserControl1
frm.Button1.Text = "Hello"


لأني أريد إرسال قيمة فقط
وليس إضهار ‘UserControl بالكامل

[ابو ليلى]

عندما تتخاطب مع اي كائن من خارج الوحدة التي هو فيها انتبه لمحدد الوصول الذي على اساسه عرف الكائن

اغلب الكائنات يتم تعريفها بالمحدد Friend  لذلك عند تعريف نسخة جديدة من الوحدة الحاوية لهذا الكائن يمكنك الوصول اليه
اما لتصل اليه مباشرة بدون تعريف نسخة جديدة من الوحدة غيره الى Public 

[sniperjawadino]

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

dim x as string = button1.text

textbox1.text = x

[أبو عمر]

اذا اني فهمتك صح

PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


        Panel1.Controls.Clear()
        Dim frm As New UserControl1
        Panel1.Controls.Add(frm)
        Panel1.Visible = True
        frm.Button1.Text = "Hello"

    End Sub 


[sniperjawadino]

الفكرة صحيحة أخي
لكن هل يمكن عملها بين ال Usercontrol