منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(09-08-20, 12:36 AM)عبد الهادي بهاب كتب : [ -> ]لقد قمت  بتكرار الامر في كل مرة
 AddHandler NovoN.Click, Sub(s, ev) Rep = s.name
               AddHandler NovoN.Click, Sub(s, ev) correction()
و نجح

(09-08-20, 12:36 AM)عبد الهادي بهاب كتب : [ -> ]لقد قمت  بتكرار الامر في كل مرة
 AddHandler NovoN.Click, Sub(s, ev) Rep = s.name
               AddHandler NovoN.Click, Sub(s, ev) correction()
و نجح

(09-08-20, 11:43 AM)Anas Mahmoud كتب : [ -> ]الطريقة الأصح :

كود :

               AddHandler NovoN.Click, Sub(s, ev)
                                           Label1.Text = s.Location.ToString
                                           Mysub()
                                       End Sub