بســم الله الـرحمــن الرحيــم
السلام عليكــم ورحمـة الله وبركاتــه
عندي مجموعة textbox يقوم المستخدم بتعبئة بياناتها وعند الضغط على bottun تتفرغ جميع محتوياتها .
السوال : كيف اعمل ذلك دفعة واحدة بدلا من كتابة الكود لكل واحد منها على حدة لان عددها كبير جدا عندي في كل فورم
إذا كان جميع الـ TextBoxes في حاوية الـ Form إذا استخدم الكود التالي, إما إذا كنت قد أضفتهم إلى Control أخر, استبدل كلمة ( Me ) من الـ Code التالي بـ ( اسم الـ Control الحاوي للـ TextBoxes ) .
[color= #000000; font-weight: bold;]Private Sub Button1_Click[color= #009900;]( Byval Sender [color= #b1b100;]As [color= #990000;]System[color= #339933;].OBject[color= #339933;], Byval E [color= #b1b100;]As [color= #990000;]System[color= #339933;].EventArgs [color= #009900;]) Handles Button1[color= #339933;].Click [color= #b1b100;]For [color= #990000;]Each Con [color= #b1b100;]As Control In Me[color= #339933;].Controls [color= #b1b100;]If TypeOf Con Is TextBox Then DirectCast[color= #009900;]( Con[color= #339933;], TextBox [color= #009900;])[color= #339933;].Text[color= #339933;].Clear[color= #009900;]([color= #009900;]) [color= #990000;]Next Con [color= #990000;]End Sub
تم تعديل هذه المشاركة بواسطة Bashar Rabat في 6 يناير 2009 في 23:42
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.
المتواجدون خلال آخر ساعة · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…