استخدام الحلقة التكرارية
(Do While ... Loop)
تستخدم لتكرار مجموعة أوامر فى حالة عدم معرفة عدد مرات
التكرار بناء علي شرط معين .
صيغة الجملة Do While ... Loop
Do While (Conditional
Expression) شرط بداية التكرار
Code
المقصود بـ ( Do While) تنفيذ الكود ( Code)
طالما التعبير الشرطى صحيح ( True)
.
عند وصول البرنامج الى الامر Do While
1) اذا كان الشرط صحيح True فان الحاسب يقوم بتنفيذ الكود Code الذى يلى
الشرط وحتى اخر امر قبل كلمة Loop ثم يعود مرة اخرى الى Do While ليتم تقييم الشرط مرة اخرى .
2) فان كانت النتيجة مرة اخرى True
فيستمر التكرار .
3) وان كانت نتيجة الشرط False
فينتهى التكرار ويتم تنفيذ الاوامر التى تلى كلمة Loop.
ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
خلى بالك :-
§
يتم تنفيذ الاوامرالموجوده بعد Do While ما دام
الشرط صحيحأ ويستمر تنفيذ اوامر التكرار طالما كان الشرط قيمته (True ).
§
يمكن التعامل مع التعبير الشرطى
باضافة معاملات الربط المنطقية AND و OR
ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
تمرين باستخدام جمل
التكرار
تمرين
لحساب مجموع الأعداد الفردية
من 1 إلى8
|
|
Private Sub
Button1_Click
Dim i = 1, total As Integer
Do While i <= 8
total =
total + i
i = i + 2
MessageBox.Show(total)
End Sub
|
Private
Sub Button1_Click
Dim i, total As Integer
For i = 1 To 8 Step 2
total =
total + i
MessageBox.Show(total)
Next
End Sub
|
4 التعليقات
إضغط هنا لـ التعليقاتلانهاء الحلقة التكرارية do while عندما تصبح قيمة ال n=2 فكيف يتم كتابة جملة Do while
ردDo while N <>2
ردطب لانهاء الحلقة التكرارية do while عندما تصبح قيمة ال n<>2 فكيف يتم كتابة جملة Do while
ردDo while N =2
ردتحويل كود إخفاء محول الأكواد الإبتسامات إخفاء