می خواهم کار با دستور Do رو با چند تا مثال با توضیح یاد بگیرم
Printable View
می خواهم کار با دستور Do رو با چند تا مثال با توضیح یاد بگیرم
سلام
همینطور که می دونی دستور do هم مثل for حلقه تکراره
یعنی یک دستور رو می شه با استفاده از این حلقه ها چندین بار تکرار کرد
فرقش اینه که با استفاده از حلقه For دستوری را با تکرار مشخص میشه تکرار کرد
مثلا ما 10 کامند داریم به نامvb و 10 index دارد و می خوایم caption این کامند ها رو به seh x تبدیل کنید
راه اول اینه که یکی یکی برای این کار کد بنویسیم
ولی راه حرفه ای تر اینه که از دستور for استفاده کنی به صورت زیر:
حالا فرض کن می خوای هر وقت ثانیه زمان کامپیوتر بین 40 تا 45 بود و کاربر روی دکمه seh کلیک کرد تا زمانی که زمان کامپیوتر ب 45 می رسد یک کد، مثلا یک مسیج باکس تکرار شودکد:For i = 1 To 2
vb(i).Caption = "seh x"
Next i
حالا دیگه نمیشه از for استفاده کرد بلکه باید از do استفاده کنی
منظورم اینه که تعداد تکرار حلقه do مشخص نیست و به شرطش بستگی داره
یعنی یک شرط میزاری برای حلقه ، در هر بار تکرار شدن برنامه شرط را چک می کند اگر درست بود وارد حلقه می شود و اگر صحیح نبود حلقه تکرار تمام می شود
برای برنامه فوق باید این کد را بنویسی:
فکر کنم فهمیده باشیکد:Private Sub seh_Click()
Do While Second(Time) >= 40 And Second(Time) <= 45
MsgBox "ok"
Loop
End Sub
بازم اگه سوالی داشتی بگو
البته در ادامه ی صحبت دوستمون باید بگم که:
غیر از while یکی دیگه هم هست . شما میتونین از until به جای while استفاده کنین
فرقش اینه که در اینجا حلقه اونقدر اجرا می شه تا دستور برقرار بشه و بعد از اون دیگه اجرا نمی شه
یک نکته ی دیگه اینه که شما می تونین do رو به دو صورت استفاده کنین که با هم کمی فرق دارن:
do until(or while) a = 1
msgbox test
loop
یا
do
msgbox test
loop until(or while) a = 1
فرق این دو در اینجاست که در اولی اگه شرط از همون اول برقرار باشه دیگه دستورات درون حلقه اجرا نمی شه و مستقیم میره سر بقیه دستور ها اما در دومی اول یبار دستور ها ی داخل حلقه اجرا می شه بعد شرط چک می شه . اینجوری ما مطمئن می شیم که اگه شرط درست باشه بازم حد اقل یک بار دستورات درون حلقه اجرا می شن. ولی تو اولی اگه شرط درست باشه دستورات درون حلقه حتی یک بار هم اجرا نمی شن!
اگه سوالی داشتی بازم بپرس!
تشکر یادتون نره
بای
راستی یه سوال!
شما چی کار می کنین که کد هاتون تو یه مستطیل کد میاد
من هر کار کردم نتونستم!
کم کم یاد می گیری [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]نقل قول:
راستی یه سوال!
شما چی کار می کنین که کد هاتون تو یه مستطیل کد میاد
من هر کار کردم نتونستم!
موقع ارسال روی حالت پیشرفته کلیک کن
بعد توی صفجه جدید از سمت بالا سمت راست دکمه های ردیف دوم
دکمه سیزدهمی رو بزن که از سمت چپ میشه چهارمی
بعد کدت رو بزار