[oneyemenweb2]

منقول من المنتدى القديم
كاتب المقال احمد جمال المشرف العام
الحلقات التكرارية :

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

For - Next Loop :
حلقة تكرار يتم تحديد نقطة البداية والنهاية ومقدار الخطوة فيها ، ابسط مثال عليها الكود التالي :

C#:

كود :

for (int i = 0; i < 10; i++)
{
Console.WriteLine(i);
}

VB.net:

كود :

For i As Integer = 0 To 9
  
    Console.WriteLine(i)
Next

يمكن عمل مقدار القفز = 2 مثلاً بالشكل التالي - لطباعة الارقام الزوجية مثلاً - :

C#:

كود :

for (int i = 0; i < 10; i+=2)
{
Console.WriteLine(i);
}

VB.net:

كود :

For i As Integer = 0 To 9 Step 2
    
    Console.WriteLine(i)
Next

While Loop :

حلقة تكرار تستمر في العمل حتى تحقق شرط معين ، لنفترض مثلاً حتى وصول العداد إلى رقم 10 :

C#:

كود :

int x = 0;
while (x < 10)
{
Console.WriteLine(x);
}

VB.net:

كود :

Dim x As Integer = 0
While x < 10
  
    Console.WriteLine(x)
End While

حالة اخرى غير رقمية ، ادخال بيانات حتى ادخال exit ، في هذه الحالة سوف نضيف Do في البداية ونضع While في النهاية .

C#:

كود :

string inp;
do
{
inp = Console.ReadLine();
Console.WriteLine(inp);
}while(inp!="exit");

VB.net:

كود :

Dim inp As String
Do
    inp = Console.ReadLine()
  
    Console.WriteLine(inp)
Loop While inp <> "exit"

For Each Loop

للدوران على (كل) شيء معين ، مثلاً للدوران على كل عناصر مصفوفة معينة مثلاً :

C#:

كود :

int[] arr = { 10, 20, 30, 40 };
foreach (int i in arr)
Console.WriteLine(i);

VB.net:

كود :

Dim arr As Integer() = {10, 20, 30, 40}
For Each i As Integer In arr
    Console.WriteLine(i)
    
Next

إلى هنا نكون قد انتهنيا من الجزء الثاني من دروس هذا الاسبوع ،إلى اللقاء في الجزء القادم .

والسلام عليكم ورحمة الله وبركاته .
للتحويل بين VB.net و C# ، فقط قم بنسخ الكود ووضعه في الموقع التالي :
http://labs.developerfusion.co.uk/co...arp-to-vb.aspx

سوف يخرج لك الكود بلغة VB.net .