سؤال للتفكير فهل من مشارك

[albhe]

عند تتبع المتغيرات كانت النتيجة كالتالي وذلك بكتابة msgbox قبل next
x=4
y=-1

ثم

x=0
y=-1

و ستظل هكذا

x=0
y=-1

إلى ما لا نهاية
وعندما نكتب msgbox بعد next يعلق البرنامج
ولكم الشكر

[سيف سالم]

المشاركة الأصلية كتبت بواسطة 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)

دا عمليا
يبقى التفسير
كيف