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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=19320)



كود تعطيل - bidaya - 19-02-17

السلام عليكم
احتاج كود مختصر يقوم بتعطيل مجموعة من الزرار
اي وكمثال لدينا 10 ازرار
بدل ما اقوم بكتابة لكل زر   Button1.Enabled = False
ارد اختصار الامر للازرار الكل
وشكرا


RE: كود تعطيل - bidaya - 19-02-17

(19-02-17, 04:36 AM)khodor1985 كتب : السلام عليكم أخي العزيز ورحمة الله وبركاته
لقد تم إنشاء مشروع بسيط بناء لطلبك :
الكود :
PHP كود :
Private Sub btnDisable_Click(sender As ObjectAs EventArgsHandles btnDisable.Click
        Dim control 
As Control
        For Each control In Me
.Controls
            If TypeOf control Is Button Then
                control
.Enabled False
            End 
If
 
       Next
        Me
.btnDisable.Enabled True
    End Sub 

المشروع :


أتمنى لك التوفيق
شكرا لك اخي على الرد الجميل
الله يحفظك


RE: كود تعطيل - EnormousSoft - 20-02-17

فى طريقه تانى لو عاوز تعطل مجموعه معينه من الادوات
وهى وضع الادوات داخل panel او group box
عند تعطيل ال panel او group box سوف تتعطل جميع الادوات بداخله تلقائيا
ويمكنك فعل هذا مع جميع الخصائص
مثلا لتغير حجم الخط او لونه
او لتغير لون او الخلفيه
الفكره ان الادوات بداخل اى وعاء ( panel او group box) تتخذ نفس الخصائص المشتركه من الوعاء