+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] اختصار الكود (/showthread.php?tid=40464)
اختصار الكود - EMADSS - 12-01-22
كود :
Text1.hide
Text2.hide
Text3.hide
Text4.hide
Text5.hideكيف بقدر اختصر هذه الاكواد بسطر واحد فقد يكون لدي 50 تكست واريد اخفائها بكبسة زر واحدة
والسؤال الثاني اذا كان
عندي ضمن الاكواد كلمة مثل show مكرره ضمن الاكواد اكثر من عشرين مرة بعدة سطور كيف بقدر اغير هذه الكلمة لكلمة اخرى لكل الاسطر دفعة واحدة
RE: اختصار الكود - أبو خالد الشكري - 12-01-22
(12-01-22, 12:10 AM)EMADSS كتب :احبابي عندي سؤالين بسيطينكود :
Text1.hide
Text2.hide
Text3.hide
Text4.hide
Text5.hide
كيف بقدر اختصر هذه الاكواد بسطر واحد فقد يكون لدي 50 تكست واريد اخفائها بكبسة زر واحدة
والسؤال الثاني اذا كان
عندي ضمن الاكواد كلمة مثل show مكرره ضمن الاكواد اكثر من عشرين مرة بعدة سطور كيف بقدر اغير هذه الكلمة لكلمة اخرى لكل الاسطر دفعة واحدة
مرحبا بك أخي EMADSS
يمكنك استخدام الكود التالي لإخفاء جميع TextBox الموجودة على الفورم
كود :
For Each ctl As Control In Me.Controls
If TypeOf (ctl) Is TextBox Then
ctl.Hide()
End If
Nextبالنسبة لإجابة السؤال الثاني ،
استخدم ميزة استبدال لاستبدال الكلمة المطلوب تغييرها بالكلمة الجديدة
يمكنك فعل ذلك بطريقتين :
1- انقر على قائمة Edit واختر منها Quick Replace
2- أو انقر على على زري Ctrl + H من لوحة المفاتيح
اكتب في الصندوق العلوي الكلمة المراد استبدالها
واكتب في الصندوق االسفلي الكلمة الجديدة .
بالنوفيق إن شاء الله .