السلام عليكــم ورحمـة الله وبركاتــه ،،
اللي يعرف ياجماعه يشرحلي هالكود00خطوة بخطوة
وخاصه من لما يبدا من الWhile
وشكرا
Dim side As Integer '
Dim row As Integer '
Dim column As Integer '
Console.Write("Enter side length (must be 20 or less): ")
side = Console.ReadLine()
If side <= 20 Then
While row <= side
column = 1
While column <= side
Console.Write("* ")
column += 1
End While
Console.WriteLine()
row += 1
end while
Else
Console.WriteLine("Side too large")
End If
End Sub
End Module
تم تعديل هذه المشاركة بواسطة فتاه الاسلام في 9 أبريل 2009 في 00:34
الف شكر الك اخوي kazabra شرحك وايييييد واضح ومفيد00الله يسلمك بس اقول ذاا الrawكان الها قيمه ابتدائيه =1 شو رح تعني وشو الفرق ؟
when Row =0 It's Loop Equal To Side No - Row = 20 - 0 = 20
But If Row =1 It's Loop Equal No If Side No - Row = 20 - 1= 19 Loop
شكرا كتير 000يعني الشغله بعدد اللوب000بصراحه ما فهمت كتير :lol: :blush:بس لما طبقت الحل على الجهتين طلع نفسو
طيب بليزززززز شفلي الموضوع التاني00طالبه كمان شرح كود ازا بتقدر