اسئل عن فتح اكثر من Subعند الضغط على نفس الاداة

أين جملة Handle

السلام عليكم

ما هي الإصدارة التي تطور عليها ؟

لانه والله أعلم أن الإصدارة 1.0 كان بها هذا الـ bugs وهي 2002

أظن انه لا يهم الاسم

Button1_Click

Button1_Click_1

المهم هو ال Handles و يجب أن يكون يشير الى ال Event الخصة بالبوتن Click

Handles Button1.Click

اقتباس

أظن انه لا يهم الاسم

Button1_Click

Button1_Click_1

المهم هو ال Handles و يجب أن يكون يشير الى ال Event الخصة بالبوتن Click

Handles Button1.Click

هوه ده الكلام الصح

أخوتي الاعزاء

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

اذا كان المهم هو ان يكون handles يشير الى ال Event الخصة بالبوتن Click فالمشكلة تقع عندي عند الضغط على Button1 فى run time فأنه لايعمل الي ان الغي Private Sub Button1_Click_1 ( الذي ظهر في وقت سابق من العمل كما وضحناه بالمثال السابق ) واتمنى ان تكون المشكلة مشكلة اصدار كما ورد بأحد الردود ولكن اريد ان اوضح بان النسخة التي اعمل عليها هي 2003 وليس 2002 -waf

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

الكلام الذي يقال عن الـ Handles صحيح

و لكن أعتقد أن المشكلة التي تحصل معك هي أنك أضفت أداة Button1 على الـ Form ثم حذفتها و قمت بوضعها مرة أخرى فتحدث هذه المشكلة تقريباً و هذا يعتبر عيب من عيوب الـ Editor الخاصة باللغة..هذا و الله أعلم.

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

انت مشكلتك انك حذف ال Handles وهذا يعطيك انه الزر ليس له اي فائده في الكود وانت خوذ زر وضعه فيه مثلا رساله ترحيب وحذف ال Handles ودير تنفيذ لبرنامج حتي شوف انه الزر لا يعمل مع ان الكود مكتوب فيه لان مقيض الزر محذوف والله اعلم

أيمن عشبة _بنغازي_ليبيا

السلام عليكم

أخي الطيب كلام ( بوجلاوي ) صحيح

لكن هذا ليس عيب من عيوب المحرر

لانه بشكل منطقي أنت لم تضغط على الزر ضغط مزدوج يقوم المحرر

بإنشاء إجراء يتمثل باسم الزر مع الحدث الإفتراضي وهو الضغط Button1_Click

هذا الإجراء لا يحذف إذا تم حذف الزر كونه غير مرتبط بالزر بل الزر مرتبط به عن طريق

حدث الزر وهو Handles و بالتحديد حدث الضغط Button1.Click

وهذا يفسر لنا مشكلتك بحيث أنك تضع زر وتضغط عليه ضغط مزدوج double Click ثم تقوم بحذف الزر

ثم تضع أخر سيأخذ الأسم الإفتراضي وهو اسم الزر الأول لكن عندما تقوم بالضغط المزدوج عليه سيجد المحرر أن هنالك

إجراء يأخذ نفس الاسم سيقوم بلا شك بزيادة بالشكل التالي Button1_Click_1

لان حذف الزر يحذف فقط تعريفة وخصائصة

و آسف كنت أظنه Bugs و لكن الـ bugs فينا وليس في البرنامج B)

السلام عليكم

عبدالجليل العقوري كتب:

الأخوة الأعزاء

تحية طيبة وبعد

هذه المشكلة لم أجد لها حل وهي تتمثل في الأتي :

عندما اضغط على button1 للمرة الأولى لكتابة الكود فيه فأنة يظهر على شكله الطبيعي الأول وهو كالتالي

      ( Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As  System.EventArgs

Handles Button1.Click

                                                                                     

                                                                                                                          form3.ShowDialog

 

                                                                                                                                                  End Sub

ولكن عندما ارجع واضغط على Button1 للمرة الثانية مثلا للتعديل في الكود وانقر Click فأجد المؤشر قد دخل إلي الكود التالي Button1_Click_1 هذا قد سبب لي الكثير من المشاكل عند التنفيذ حيث أجد أن الكود الذي كتبته في Button1_Click لايعمل فبالتالي اضطر إلى نقل الكود من Button1_Click إلى Button1_Click_1

  (Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As  System.EventArgs

Handles Button1.Click

                                                                                                                    Dim form3 As New Form3                                                                                                                                                 

                                                                                                                                                  ---------                                   

                                                                                                                                                  ---------

                                                                                                                                                  End Sub

←

الأخوة الأعزاء

تحية طيبة وبعد

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

وجزاكم الله خيرا

el_aquori1@yahoo.com