عرض مشاركة واحدة
  #23  
قديم 09-05-2014, 02:55 PM
الصورة الرمزية أحـمد قرنى
أحـمد قرنى أحـمد قرنى غير متواجد حالياً
معلم حاسب آلى
 
تاريخ التسجيل: Oct 2010
المشاركات: 2,465
معدل تقييم المستوى: 16
أحـمد قرنى has a spectacular aura about
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة winter4444 مشاهدة المشاركة
والله أنا تعبتك معايا لكن سؤال الطالب سيكون حول هذه النقطة
Dim M As Integer

For M = 10 To 1 Step -2
MSGBOX (M
Next
في هذه الحالة التكرار يتوقف عند 2

حضرتك فى حالة وجود Msgbox هنا بيبقى عايز ما يغرض داخل مربع الرسالة وليس قيمة العداد لان بردو قيمة العداد هيعرض اخر حاجة داخل مربع الرسالة 2 ويطلع ينقض -2 يبقى صفر فى الحالة دى يخرج من التكرار وينفذ ما بعد next وهنا مش موجود حاجة يبقى خلص الكود ويبقى اخر ما عرض داخل مربع الرسالة 2
ــــــــــــــــــــــــــــــــــــــــــــــــــ ـــــــــــــــ
Dim M As Integer
For M = 10 To 1 Step -2
Next
MSGBOX (M
التكرار هنا يتوقف عند الصفر
سؤالي الطالب سيضع القيمة على أساس أي من الاثنين
هنا ال msg box بعد كلمة next والمعروف اننا بنفذ ما بعد next لاما ينتهى التكرار وعشان الزيادة هنا بالسالب هيخرج لما تكون قيمة البداية اصغر من قيمة النهاية واللى هى صفر يبقى هيعرض الصفر بس



اما فى حالة عدم وجود msgbox يبقى هنا هيعرض قيمة العداد الاخيرة واللى انتهى هندها التكرار واللى هى صفر
__________________
ـــــــــــــــــــــــــــــــــــــــــــــــ
لا إله إلا أنت سبحانك إنى كنت من الظالمين
رد مع اقتباس