عرض مشاركة واحدة
  #5  
قديم 25-03-2015, 02:23 PM
الصورة الرمزية زياد_عاطف
زياد_عاطف زياد_عاطف غير متواجد حالياً
معلم كمبيوتر و تكنولوجيا المعلومات
 
تاريخ التسجيل: Aug 2008
المشاركات: 503
معدل تقييم المستوى: 17
زياد_عاطف is on a distinguished road
New

مراجعة 2 على For Next
تتبع مجموعة الأوامر التالية
أوجد قيمة العداد و قيمة المتغير Y و عدد مرات التكرار
Dim X , Y as Integer
For X = 0 to 10 Step 3
Y = X * 2
MsgBox(y )p
Next X
MsgBox(Y & X )p
=======================
تتبع مجموعة الأوامر التالية
أوجد قيمة العداد و قيمة المتغير Y و عدد مرات التكرار

Dim X , Y as Integer
For X = 0 to 10 Step 3
Y = X * 2
MsgBox(y )p
Next X
MsgBox(Y & X )p
=======================
تتبع مجموعة الأوامر التالية
أوجد قيمة العداد و قيمة المتغير Y و عدد مرات التكرار

Dim X , Y as Integer
For X = 0 to 10 Step -3
Y = X * 2
MsgBox(y )p
Next X
MsgBox(Y & X )p
====================================
تتبع مجموعة الأوامر التالية
أوجد قيمة العداد و قيمة المتغير Y و عدد مرات التكرار

Dim X , Y as Integer
For X = 2 to 15 Step 6
Y = X * 3
MsgBox(y )p
Next X
MsgBox(Y & X )p
====================================
مع أطيب التمنيات
عاطف مهدى حسان




رد مع اقتباس