نموذج اجابة الحاسب صحيح تماما

[momo momo]

المشاركة الأصلية كتبت بواسطة lola1eg

من فضلك افتح ملف وضع في زر واكتب بداخله هذا الكود وشوف الناتج


Dim x, m AsInteger
x = 1
For m = 0 To 7 Step 3
x = x * 2
Next
MsgBox(m)
MsgBox(x)

سوف تظهر قيمة m , x وسوف تجدها 9 و 8 كما هي في نموذج الاجابة

طيب حضرتك جربى و حطى ال 2 msgbox قبل الNext و شوفى اية الناتج

Dim x, m AsInteger
x = 1
For m = 0 To 7 Step 3
x = x * 2
MsgBox(m)
MsgBox(x)
Next

هنا بقى اسالى الموجة الى وضع الامتحان الطالب يعرف منين ان حضرتك عايز قيمة m قبل او بعد Next؟؟؟؟؟!!!!!!!!!!!!!!!!!!!!!!!!!!!!!