طريقة افراغ كل الـTextboxes الموجودة في برنامجك من النصوص بخطوة واحدة

درسنا اليوم سهل و بسيط و ممتع جدا سنتعرف فيه على كيفية افراغ كل Textboxes الموجودة على Form من النصوص  بخطوة واحدة و بطريقة اخترافيه بسيطة ...انظر الى الصورة التالية :






فاذا أردنا افراغ كل Textboxes  السابقة من النصوص المكتوبة فيها  فان الكود الذي سيكتبه أغلبنا و يهدر به كثير من الوقت في كتابة أسطر طويلة متشابهه تأخد مساحة من الذاكرة نحن أولى بها هو هذا الكود :

         TextBox1.Text = ""
        TextBox2.Clear()
        TextBox3.Text = ""
        TextBox4.Clear()
        TextBox5.Clear()
        TextBox6.Clear()
        TextBox7.Text = ""
        TextBox8.Text = ""
        TextBox9.Text = ""
        TextBox10.Text = ""
        ....
        TextBox99.Text = ""



نأتي الآن لطريقتنا ، قم فقط بكتابة الكود التالي :


  Dim clear_textbox As New Control
        For Each clear_textbox In Me.Controls
            If TypeOf clear_textbox Is TextBox Then
                clear_textbox.Text = ""
            End If
        Next
 

بعد كتابة الكود السابق في الحدت click للــ Button1 مثلا و الضغط عليه ستمسح كل النصوص الموجودة في الــ Textboxes على طول...  
   

و طبعا كما أحب دائما ترك فهم الكود و تطبيقه لقارئي العزيز



ملحوظة:

أنصحك و بشدة وعن تجربة تحميل كتاب الأستاذ تركي العسيري برمجة اطار عمل .NET  باستخدام Visual Basic .NET و قراءة الفصل الثالث خصوصا الذي يتحدث فيه عن الفئات و الكائنات مما يساعدك على فهم الكود السابق و غيره من الاكواد بطريقة سليمة دقيقة يمكنك تحميل الكتاب بالضغط هنا    ((ستجده الكتاب الأول في الصفحة باللون الأسود )) وهو بالمناسبة كتاب أكثر من رائع أنصح بتحميله و قراءته...

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








ليست هناك تعليقات:

إرسال تعليق