التعامل مع كل الأدوات الموجودة على الفورم ومن نفس النوع

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

default التعامل مع كل الأدوات الموجودة على الفورم ومن نفس النوع

مُساهمة من طرف Admin في الثلاثاء أكتوبر 24, 2006 2:51 am

مثال يقوم بمسح جميع صناديق النص التي على الفورم

Public Sub ClearTextBoxes(frm As Form)
Dim c As Control
For Each c In frm
If TypeOf c Is TextBox Then c.Text = ""
Next c
End Sub
Private Sub Command1_Click()
Call ClearTextBoxes(Form1)
End Sub


عدل سابقا من قبل في الخميس أغسطس 16, 2007 10:40 am عدل 1 مرات

_________________
إذا أعجبك موضوع من مواضيعي فلا تقل شكـراً ...
بل قل الآتـي ::
اللهم اغفر له ولوالديه ولزوجته وابنائه ولأخوانه واخواته ولسائر المسلمين ماتقدم من ذنبهم وما تأخر..
وقِهم عذاب القبر وعذاب النار..
و أدخلهم الفردوس الأعلى مع الأنبياء والشهداء والصالحين ..
واجعل دعاءهم مستجاب في الدنيا والآخرة ..
اللـهم آميـن..اللـهم آميـن..اللـهم آميـن..

اخوكم جاد القرعان
الأردن- الطفيلة
jadquraan@yahoo.com
jad_quraansoft@hotmail.com
00962777765709
avatar
Admin
jadquraan
jadquraan

عدد الرسائل : 125
العمر : 34
تاريخ التسجيل : 19/10/2006

معاينة صفحة البيانات الشخصي للعضو http://jad4vb.lightbb.com

الرجوع الى أعلى الصفحة اذهب الى الأسفل

default رد: التعامل مع كل الأدوات الموجودة على الفورم ومن نفس النوع

مُساهمة من طرف سما في الأربعاء أغسطس 15, 2007 4:26 pm

مشكور الله يعطيك الف عافية

سما
عضو نشط
عضو نشط

عدد الرسائل : 12
تاريخ التسجيل : 15/08/2007

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

default رد: التعامل مع كل الأدوات الموجودة على الفورم ومن نفس النوع

مُساهمة من طرف سما في الأربعاء أغسطس 15, 2007 4:26 pm

مشكور الله يعطيك الف عافية

سما
عضو نشط
عضو نشط

عدد الرسائل : 12
تاريخ التسجيل : 15/08/2007

معاينة صفحة البيانات الشخصي للعضو

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى