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

1_حلقة FOR NEXT

وتستخدم تلك الحلقة لتنفيذ الاوامر البرمجية لعدد محدد من المرات و يتم بنائها على النحو التالى :

الكود:

For var=[startValue] To [endValue] [Step]


  [loopBody]


Next [var]

حيث أن :

• var هو قيمة العداد او المرات التى تريد تكرار فيها الاوامر
  
• startValue قيمية بداية التكرار
  
• endValue قيمة نهاية التكرار
  
• loopBody كتلة التعليمات البرمجية المطوب تنفيذها
  

مثال توضيحى :نفترض اننا نريد طباعة الارقام من 10 الى 20 باستخدام حلقة التكرار تلك ...فالحل :

الكود:

 Dim a As Byte
         For a = 10 To 20
          Console.WriteLine("value of a: {0}", a)
      Next
      Console.ReadLine()

و النتيجة كما يلى :

الكود:

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14
value of a: 15
value of a: 16
value of a: 17
value of a: 18
value of a: 19
value of a: 20

_ويمكنك أن تستخدم للعد الامر Step لزيادة فى كل مرة اختيارية ....ففى مثالثا السابق نفترض أننا نريد طباعة الارقام بشرط أن يكون مقدار العدد هو 2 ....كما يلى :

الكود:

Dim a As Byte
            For a = 10 To 20 Step 2
          Console.WriteLine("value of a: {0}", a)
      Next
      Console.ReadLine()

و النتيجة كما يلى :

الكود:

value of a: 10
value of a: 12
value of a: 14
value of a: 16
value of a: 18
value of a: 20

_إذا كنت ترغب في الخروج من حلقة FOR NEXT قبل الاتمام يمكنك استخدام الامر  Exit For

نشكر جهدك اخى محمد ...جزاك الله خيرا