منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كفية جلب اسم الزرار عند الضغط عليه - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كفية جلب اسم الزرار عند الضغط عليه (/showthread.php?tid=8857)

الصفحات: 1 2


كفية جلب اسم الزرار عند الضغط عليه - alimse - 12-05-13

السلام عليكم
اوريد معرفت كيف جلب اسم ايه زرار فى الفروم عند الضغط عليها فى نص رسائل عن طريق ملف كلاس :confused:

سؤال تانى
اوريد معرفت كيف جلب اسم ايه زرار فى الفروم عند الضغط مع اسم الفروم فى ايه مكان فى المشروع بمعنى اخر
عايز اكتب كلاس و اعمل استدعا فى اول فروم تفتح فى المشروع و بعد كده لو فتحت ايه فروم تانى من المشروع عايز يظهر رسائل باسم الزرار و اسم الفروم :confused:


كفية جلب اسم الزرار عند الضغط عليه - alimse - 13-05-13

up up up up


كفية جلب اسم الزرار عند الضغط عليه - Dr.Sherif - 13-05-13

لم افهم ما تريد

ارجو التوضيح
ولو بارفاق عمل مبدئي لك يوضح ما ينقصك

تحياتي ..


كفية جلب اسم الزرار عند الضغط عليه - alimse - 13-05-13

المضوع هو عباره عن فكرها لسه
راح اوضح ليك اخى
عندى فروم جوها اكتر من Button عايز لو دوس على ايه Button يظهر اسم ال Button ده رسائل تمام ده السؤال الاول
السؤال التانى هو
عندى مشروع عبار عن 6 فروم
عايز طريق اكتب كود فى اول فروم بتفتح فى المشروع ده علشان اجيب اسم ايه Button بدوس عليها من ايه فروم من ال 6 مع اسم الفروم لى فيها ال Button ده


كفية جلب اسم الزرار عند الضغط عليه - Dr.Sherif - 13-05-13

سؤال عن السؤال الأول ...
تريد اسم ال button يظهر في رسالة عند الضغط عليه ؟؟
هل هذا ما تعنيه ؟

واسم ال button المكتوب فيه ام اسمه البرمجي ؟


بالنسبة للسؤال الثاني ايضا
للاسف عقلي لم يستوعب ما تريد


كفية جلب اسم الزرار عند الضغط عليه - alimse - 13-05-13

نعم عايز ال ايه Button اضغط عليه يظهر الاسم فى رسالة

السؤال التانى هو هو الاول بس الفرق بدل ما هجيب اسم ال Button من form لى موجود عليها لا هجيب اسم ال Button من ايه form من داخل المشروع
هل وضح السؤال الثانى اخى


كفية جلب اسم الزرار عند الضغط عليه - Dr.Sherif - 13-05-13

السؤال الاول بامكانك كتابة كوده في كل زر ما المشكلة في ذلك ؟؟
يعني في حدث الكليك للزر اكتب
MsgBox(button.Text)

وسيظهر لك اسم الزر عند الضغط عليه في رساله

اما الشطر الثاني فلم افهمه ايضا

تحياتي ..


كفية جلب اسم الزرار عند الضغط عليه - alimse - 13-05-13

لم اقصد هذى الطريقة اخى
انا اوريد اكتب الكود مره وحدها فى بدية تحميل الفروم و بعد كده ايه زرا اضغط عليه يظهر اسمو فى رسالة بس كده


كفية جلب اسم الزرار عند الضغط عليه - sooriaty03 - 13-05-13

السلام عليكم ورحمة الله وبركاته

أخي الكريم بحسب ما فهمت
فإن جواب السؤال الأول:
جميع الأحداث في الدوت نت تجد فيها متغيرين
الأول Sender
والثاني e

لاحظ اللون الأحمر في الكود التالي

كود :
Private Sub Button1_Click(ByVal [color=#FF0000]sender [/color]As System.Object, ByVal [color=#FF0000]e [/color]As System.EventArgs) Handles Button1.Click

المتغير sender هو الذي يهمنا هنا، فهذا المتغير يعيد إلينا الكائن الذي أطلق الحدث
بمعنى لو أنك ضغطت على الزر Button1 فإنه سوف يطلق حدث Click فإذا قمنا بفحص قيمة المتغير sender فستكون قيمته تساوي Button1
وبالتالي إذا أردت أن تظهر رسالة باسم الزر الذي تم النقر عليه فما عليك إلا بوضع الكود التالي
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
[color=#FF0000]        MsgBox(sender.text)[/color]
End Sub

هذا بالنسبة لزر واحد فكيف إذا كان لدينا عدة أزرار؟؟
تمكننا لغة VB.Net من تعريف حدث واحد لعدة كائنات وذلك بإضافة كل كائن مع الحدث المطلوب في آخر السطر الخاص بتعريف الحدث
لاحظ الكود الأحمر من الكود التالي

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles [color=#FF0000]Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click[/color]
وأيضا مرة أخرى سنستفيد من المتغير sender ليعيد لنا الزر الذي أطلق الحدث وبالتالي سيصبح الكود بهذه الطريقة

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, Button4.Click, Button5.Click, Button6.Click, Button7.Click
        MsgBox(sender.text)
End Sub

هذا بالنسبة للسؤال الأول


كفية جلب اسم الزرار عند الضغط عليه - ali.alfoly - 13-05-13

جزاك الله خيرا
وزادك علما
كل يوم نتعلم منك الجديد



لى سؤال بالنسبة لـ

e
ارجو توضيحها