PDA

توجه! شما در حال مشاهده‌ی نسخه‌ی متنی سایت هستید و در این حالت قالب گرافیکی، تصاویر و لینک‌ها نمایش داده نمی‌شوند. برای مشاهده‌ی نسخه‌‌ی کامل بر روی لینک مقابل کلیک کنید : انواع حلقه در Visual Basic



Hamed
December 13th, 2007, 18:12
سلام
اگه میشه آموشی انواع حلقه ها در Visual Basic رو به طور ساده بزارید.
ممنون:thankyou:

sarina_18117
December 13th, 2007, 18:48
حلقه های تکرار
فرض کنید می خواهیم در ویژوال بیسیک برنامه ای بنویسیم که اعداد ۱ تا ۵ را روی فرم چاپ کند , شاید فکر کنید که به سادگی و با استفاده از دستور Print می توان این کار را انجام داد و فقط باید بنویسیم :
جهت چاپ اعداد روم فرم باید آن را در روال Form_Activate بنویسیم :
Print ۱
Print ۲
Print ۳
Print ۴
Print ۵
برنامه بالا درست است که اعداد ۱ تا ۵ را زیر هم روی فرم چاپ می کند اما واقعاً این دستور منطقی است؟ اگر می خواستید برنامه ای بنویسید که اعداد ۱ تا ۱۰۰ را روی فرم چاپ کند آیا باز هم حوصله می کردید و صد تا دستور Print می نوشتید؟ کاملاً مشخص است که راه حل فوق برای حل این مسئله منطقی نیست. ویژوال بیسیک برای حل این مشکل از حلقه های تکرار استفاده می کند. با استفاده از حلقه های تکرار به راحتی می توانیم اعداد ا تا ۵ را تنها با چند خط کد نویسی چاپ کنیم.
حلقه تکرار For … Next :
روش استفاده را با یک مثال شرح می دهم :
For a = ۱ To ۵
Print a
Next a
بعد از For ما نامی را برای شمارنده در نظر می گیریم . سپس علامت مساوی را قرار می دهیم و تعداد دفعات تکرار را تعریف می کنیم. در خط دوم شمارنده را پرینت میکنیم و خط سوم بدین مفهوم است که حلقه شمارنده مجدداً با مقدار جدید به اول باز می گردد و عملیات مربوطه را تکرار می کند. این حلقه ۵ بار تکرار می شود و در پایان اعداد ۱ تا ۵ را پشت سر هم و روی فرم چاپ می کند.
نکات قابل توجه :
· حلقه های تکرار می تواند گام کاهشی و افزایشی هم داشته باشد که با Step آن را مشخص می کنیم.
· جهت چاپ اعداد روم فرم باید آن را در روال Form_Activate بنویسیم یا خاصیت AutoRedraw در پنجره خصوصیات Form_Load برابر Ture قرار دهیم.
· حلقه تکرار می تواند از هر عددی شروع شود و به هر عددی ختم شود.
· بهتر است شمارنده را همیشه با یک حرف انگلیسی نام گذاری کنیم تا دچار سردرگمی نشویم.
قطعه برنامه زیر اعداد ۱ تا ۵ را روی فرم و زیر هم چاپ می کند :
For i = ۵ To ۱ Step - ۱
Print i
Next i


دوست عزیز من این نوشته رو از روی یه وبلاگ که برای یکی از دوستای صمیمی خودم هست برات گذاشتم
امیدوارم به دردت بخوره!

vb_bmw
December 15th, 2007, 21:37
سلام!

یه حلقه دیگه هم وجود داره!

به اسم
[Only the registered members can see the CODE Codes. Please Login OR Register]