Page 73 - أساسيات الحاسب الالي2

‫جمل التحكم‬ ‫الفصل الرابع‬

‫‪5: If i = 5 Then GoTo 10‬‬
‫‪Next i‬‬

‫)‪10: Console.WriteLine(" i= " & i‬‬
‫)(‪Console.Read‬‬
‫‪End Sub‬‬

‫‪ Nested Loops‬التكرار المتداخل‬

‫يمكن ك اس تخدام جملت ين مت داخلتين أو أكث ر م ن ‪ For Next‬م ع مﻼحظ ة ان ال دوارة‬

‫‪ Loop‬الداخلي ة تتك رر كامل ة لك ل م رة م ن م رات ال دوارة الخارجي ة ‪ .‬ﻻح ظ انه اء‬

‫الدوارة الداخلية أوﻻ ثم الخارجية‬
‫المثال التالى يوضح كيفية عمل التكرار المتداخل‬

‫)(‪Sub Main‬‬

‫‪Dim i, j As Integer‬‬

‫‪For i = 1 To 3‬‬

‫‪For j = 5 To 7‬‬
‫)‪Console.WriteLine(" i= " & i & " j = " & j‬‬

‫‪Next j‬‬

‫‪Next i‬‬

‫)(‪Console.Read‬‬

‫‪End Sub‬‬

‫‪٧٣‬‬