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

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

Loop
Console.WriteLine(" You Entered " & count & " and the
biggest number is " & max)
Console.Read()
End Sub

nested for ‫يمكننا اس تخدام التك رار المت داخل ب نفس الطريق ة ال سابق التعام ل به ا م ع‬
‫ باستخدام‬١٣ ‫ إلى‬١ ‫ كما يوضح المثال التالى المستخدم ﻹيجاد جدول الضرب من‬next

‫ المتداخلة‬Do …. While
Sub Main()

Dim i, j As Integer
i=1:j=1
Do While (i < 13)

Do While (j < 13)
Console.Write(i & "*" & j & "=" & i * j & " ")
j=j+1

Loop
Console.WriteLine()
i=i+1
j=i

٧٨