عرض مشاركة واحدة
  #20  
قديم 19-03-2012, 11:27 PM
سيف سالم سيف سالم غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Jul 2008
العمر: 57
المشاركات: 4,642
معدل تقييم المستوى: 22
سيف سالم is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة albhe مشاهدة المشاركة
عند تتبع المتغيرات كانت النتيجة كالتالي وذلك بكتابة msgbox قبل next
x=4
y=-1

ثم

x=0
y=-1

و ستظل هكذا

x=0
y=-1

إلى ما لا نهاية
وعندما نكتب msgbox بعد next يعلق البرنامج
ولكم الشكر
بارك الله لكم
علشان نعرف التتبع عمليا
اكتب البرنامج كدا
Dim x = 12, y As Short = 3
MsgBox(x)
MsgBox(y)
For x = 1 To x Step y
MsgBox(x)
MsgBox(y)
x = y + 1
y = y - x
MsgBox(x)
MsgBox(y)
Next
MsgBox(x)
دا عمليا
يبقى التفسير
كيف