بسم الله الرحمن الرحيم
أود اليوم المشاركة بكود صغير بس الكود عجبني وأردت أن افيد من لا يعرفه ...
الكود:
Dim Cnt As Control
For Each Cnt In Form1
If TypeOf Cnt Is TextBox Then Cnt.Text=""
Next Cnt
وظيفتة:
مسح جميع محتويات صندوق النصوص Text Box
بسم الله الرحمن الرحيم
أود اليوم المشاركة بكود صغير بس الكود عجبني وأردت أن افيد من لا يعرفه ...
الكود:
Dim Cnt As Control
For Each Cnt In Form1
If TypeOf Cnt Is TextBox Then Cnt.Text=""
Next Cnt
وظيفتة:
مسح جميع محتويات صندوق النصوص Text Box

اخي الكريم بارك الله فيك.. وشكرا على مجهودك..
لم يظهر الكود في المشاركة وها هو..
كود بسيط لكن فعله كبير ويمكن البناء عليه لكثير من الافكار..
تعيين قيمة موحدة لمجموع مربعات نصوص بناء على شرط..
تغيير خصائص اخرى مثل التلوين والحجم وغيرها..
ادخال تلقائي لقيم .. وهكذا..
شكرا جزيلا لكم..
Dim Cnt As Control For Each Cnt In Form1 If TypeOf Cnt Is TextBox Then Cnt.Text="" Next Cnt
همام
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
هذا الموضوع مغلق.