افراغ كل textboxs على الفورم فى الفيجوال بيسك دوت نت Clear all TextBoxes on a Form

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

بدلا من القيام بافراغ محتويات كل مربع نص على حده يمكن استخدام حلقة for each للقيام بهذا الامر بالكود التالى 

        Dim a As Control

        For Each a In Me.Controls

            If TypeOf a Is TextBox Then

                a.Text = Nothing

            End If

        Next



وفى حالة وجود مربعات النص داخل كائن groupbox يستخدم الكود التالى







              Dim a As Control

 

        For Each a In Me.GroupBox1.Controls

 

            If TypeOf a Is TextBox Then

 

                a.Text = Nothing

 

            End If

 

        Next