سوالی درباره حلقه For

به نظر شما خروجی کد زیر چیست ؟

کد:

---

x=10
 For i=1 to x
 If i=5 Then x=6
 Print i
Next

---

احتمالا شما خواهید گفت که اعداد 1 ، 2 ، 3 ، 4 ، 5 ، 6 به ترتیب چاپ خواهند شد. ولی اینگونه نیست و اعداد 1 تا با 10 چاپ می شوند.

علت چیست ؟

با تشکر.

شما اگه بخواهيد از loop خارج شيد بايد از Exit For استفاده كنيد. شما در داخل loop نمي تونيد مقدار x رو تغيير بديد. چون قبل از ورود به حلقه (loop) ثبت شده كه اين روال بايد 10 بار تكرار شود. در عوض مي تونيد به اين صورت عمل كنيد:

کد:

---

x=10
 For i=1 to x
 If i=5 Then
        x=6
        Exit For
        End if
 Print i
 Next

---

نقل قول:

---

نوشته شده توسط eh_mn

به نظر شما خروجی کد زیر چیست ؟

کد:

---

x=10
 For i=1 to x
 If i=5 Then x=6
 Print i
Next

---

احتمالا شما خواهید گفت که اعداد 1 ، 2 ، 3 ، 4 ، 5 ، 6 به ترتیب چاپ خواهند شد. ولی اینگونه نیست و اعداد 1 تا با 10 چاپ می شوند.

علت چیست ؟

با تشکر.

---

عزيز جان سلام اول كد رو كامل بنويس اگه با اين كد جواب داده برو خدارو شكر كن و برنامه رو واسه ما بفرست آخه تو نيت كردي اون جواب داده نه end if نه ...

نقل قول:

---

نوشته شده توسط sa3er

شما اگه بخواهيد از loop خارج شيد بايد از Exit For استفاده كنيد. شما در داخل loop نمي تونيد مقدار x رو تغيير بديد. چون قبل از ورود به حلقه (loop) ثبت شده كه اين روال بايد 10 بار تكرار شود. در عوض مي تونيد به اين صورت عمل كنيد:

کد:

---

x=10
 For i=1 to x
 If i=5 Then
        x=6
        Exit For
        End if
 Print i
 Next

---

---

با سلام و تشکر از پاسخ شما.
لطفا به این سوال من نیز جواب دهید. چرا تغییر کران بالای حلقه For بر خلاف ویژوال بیسیک در C امکان پذیر است ؟

با تشکر.

نقل قول:

---

نوشته شده توسط jvd

عزيز جان سلام اول كد رو كامل بنويس اگه با اين كد جواب داده برو خدارو شكر كن و برنامه رو واسه ما بفرست آخه تو نيت كردي اون جواب داده نه end if نه ...

---

با سلام خدمت شما.
متاسفانه من معنی لغت "نیت" را متوجه نشدم.
در ویژوال بیسیک دستور If به دوشکل استفاده می شود :
1. تک خطی Single Line
2. چند خطی Multiline
شکل کلی استفاده از این دستورات بصورت زیر است :

کد:

---

------ >  Single Line
If condition Then statements Else statements
------ >  Multi  Line
If condition Then
statements
ElseIf condition Then
statements
.
.
.
Else
statements
EndIf

---

همان طور که ملاحظه می کنید در مورد اول نیازی به استفاده از EndIf نیست.

موفق باشید.

eh_mn جان درست می گه دستور ایف به سه حالت نوشته می شه که دستور iif() هم جزو اوناست

نقل قول:

---

نوشته شده توسط eh_mn

با سلام و تشکر از پاسخ شما.
لطفا به این سوال من نیز جواب دهید. چرا تغییر کران بالای حلقه For بر خلاف ویژوال بیسیک در C امکان پذیر است ؟

با تشکر.

---

چون ویبی vb هست و سی C هست.

نقل قول:

---

نوشته شده توسط Payman_62

چون ویبی vb هست و سی C هست.

---

با تشکر از پاسخ شما.
سوالم را طور دیگر مطرح می کنم.
چه چیز باعث بروز چنین تفاوتی میان دو زبان شده است ؟
کامپایلر ، مترجم و یا ....
(لازم به ذکر است که Turbo Pascal نیز مشابه VB عمل میکند. پس باید یک تفاوت اساسی وجود داشته باشد.)

موفق باشید

نقل قول:

---

نوشته شده توسط blackroos

eh_mn جان درست می گه دستور ایف به سه حالت نوشته می شه که دستور iif() هم جزو اوناست

---

با تشکر از توجه شما.
تابع IIF جزء توابع (دستورات) پیش فرض VB نیست. بلکه جزء توابع کلاس Interaction از کتابخانه VBA می باشد.
برای پی بردن به این مطلب کافیست لغت IIF را در Object Browser جستجو کنید.

موفق و پیروز باشید.