انا على حد فهمى فى ال For ... Next فهمت شيئان
1- ان عند وضع مثلاً
Dim x , D As integer
X = 4
For c = 0 To 7 Step 3
X = X*2
Next
MsgBox (x) انه وضع الشرط For لتحديد عدد المرات التى سوف يتم فيا تكرار عملية ايجاد قيمة x
1- هنوجد عدد مرات التكرار هتكون {0 . 3 . 7} و السبعة موجده لانه فى مجال التكرار (0to 7)
2- نبدأ فى حساب قيمة x على اساس عدد مرات التكرار
1 - x = 4*2 : x= 8
2- x = 8 *2 : x = 16
3- x = 16 * 2 : x = 32
فى العمليات السابقة قمنا بالتعويض عن الناتج الذى يظهر كل مرة و عددة مرات التعويض ينتج من عدد مرات التكرار حتى نتوصل الى اخر تعويض مع اخر تكرار يكون الناتج 32
__________________
أنا العبد الذي كسب الذنوبا وصدتـه المعاصـي أن يتوبـا أنا العبد الذي أضحى حزينـاً علـى زلاتـه قلقـاً كئيبـا أنا العبد الذي سطرت عليه صحائف لم يخف فيها الرقيبـا أنا العبد المسيء عصيت سراً فمالي الآن لا أبدي النحيبـا أنا العبد المفرط ضاع عمري فلـم أرع شبيبـة والمشيبـا
|