بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته ...
عملية ترتيب أكواد وشفرات مشروع هي من العمليات المهمة والتي تظهر أهميتها عندما تنتهي من البرنامج دون تنسيق أو ترتيب وتعود بعد مدة لتطوير البرنامج ، ستلاحظ أن عملية التطوير أصبحت شاقة لغياب عاملين أساسيين هما : التعليقات وترتيب الأكواد ، وهديتي تتعلق بالعامل الأخير .
هديتي اليوم إليكم عبارة عن بريمج قد يعرفه البعض منا ، إنه Indenter VB .
إلى من لا يعرفه هذا البرنامج هو إضافة بسيطة على بيئة التطوير الخاصة بفيجوال بيسك 6 ، تقوم بإضافة بند جديد ( باسم Smart Indenter ) للقائمة المختصرة التي تظهر عند النقر بزر الفأرة الأيمن على نافذة الأكواد .

تحتوي هذه القائمة على أربعة خيارات :
1- Indent Procedure : ويقوم بتنظيم وترتيب أكواد الإجراء الحالي المحدد عليه .
2- Indent Module : ويقوم بترتيب أكواد الوحدة الحالية التي تعمل عليها سواء أكانت نموذجًا أو وحدةً نمطيةً أو غيرها .
3- Indent Project : وكما هو واضح من اسمها فهي تقوم بترتيب أكواد المشروع بأكمله .
4- Indenting Options : يعرض لك مربع حوار تستطيع منه تغيير بعض خصائص البريمج .
* مثال بسيط :
Private Sub Form_Load() For x = 0 To 255 For y = 0 To 255 For z = 0 To 255 If x = y * z Then MsgBox "تحقق الشرط" End If DoEvents Next z Next y Next x End Sub
* المثال نفسه بعد عملية الترتيب والتنظيم :
Private Sub Form_Load() For x = 0 To 255 For y = 0 To 255 For z = 0 To 255 If x = y * z Then MsgBox "تحقق الشرط" End If DoEvents Next z Next y Next x End Sub
أرأيت الآن كيف أن ترتيب الأكواد مسألة مهمة .
وفي الختام أسأل الله العلي العظيم أن يوفقني ويوفقكم لما يحبه ويرضاه
وصلى الله وسلم على نبينا محمد وعلى آله وصحبه أجمعين
والسلام عليكم ورحمة الله وبركاته ...



![29_09_05_02_32_59_1128029579_4_13_3[_].gif](http://www.arabteam2000.com/picload/pics/29_09_05_02_32_59_1128029579_4_13_3%5B_%5D.gif)

