عملية ترتيب أكواد وشفرات مشروع هي من العمليات المهمة والتي تظهر أهميتها عندما تنتهي من البرنامج دون تنسيق أو ترتيب وتعود بعد مدة لتطوير البرنامج ، ستلاحظ أن عملية التطوير أصبحت شاقة لغياب عاملين أساسيين هما : التعليقات وترتيب الأكواد ، وهديتي تتعلق بالعامل الأخير .

هديتي اليوم إليكم عبارة عن بريمج قد يعرفه البعض منا ، إنه 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


أرأيت الآن كيف أن ترتيب الأكواد مسألة مهمة .

وفي الختام أسأل الله العلي العظيم أن يوفقني ويوفقكم لما يحبه ويرضاه

وصلى الله وسلم على نبينا محمد وعلى آله وصحبه أجمعين

والسلام عليكم ورحمة الله وبركاته ...
الملفات المرفقة

المصدر الفريق العربي للبرمجة