دوستان اين تاپيك خيلي با حاله
من كه 1 آماتورم از خدا ميخام اين تاپيك ها بيشتر بشن.
حالا ببخشيد اگه چند خط اراجيف نوشتم فقط ميخاستم بگم كه بعضي ها دارن از اين تاپيك حد اكثر استفاده رو ميكنن و كلي براي اساتيد اين تاپيك دعا ميكنن
دوستان اين تاپيك خيلي با حاله
من كه 1 آماتورم از خدا ميخام اين تاپيك ها بيشتر بشن.
حالا ببخشيد اگه چند خط اراجيف نوشتم فقط ميخاستم بگم كه بعضي ها دارن از اين تاپيك حد اكثر استفاده رو ميكنن و كلي براي اساتيد اين تاپيك دعا ميكنن
در vb.net 5 ساختار برای کار با شرطها وجود دارد که عبارتند از : If\ Then , If\ Then \ Else , Select Case , Switch و Choose . دو دستور آخر در vb6 وجود نداشتند و در نسخه .net عرضه شده اند.
ساختار If \ Then : یا ساختار شرط تک انتخابی که برای تست کردن صحت یک شرط بکار میرود و در صورتیکه مقدار شرط true باشد, دستورهای داخل بدنه شرط اجرا میشود.مثال :
ساختار شرط If\ Then با دستور If شروع میشود, پس از شرط , عبارت Then و بدنه شرط که محل قرار گرفتن کدهای اجرا شونده بعد از تست شرط است. در پایان هم با عبارت End If از شرط خارج میشویم. در صورت استفاده از دستور فوق ما فقط قادر به آزمون یک تست و طبعا نتیجه گیری بر اساس همان تک شرط هستیم و فقط یک راه برای انتخاب داریم.اگر شرط True نباشد برنامه بدون انجام کاری از دستور خارج میشودDim temperature As IntegerIf temperature>30 ThenMsgbox("very hot")End if
ساختار If \Then \ Else : در این دستور شرطی بر خلاف دستور بالا دو حالت انتخاب وجود دارد, True بودن شرط که منجر به اجرای عملی میشود و یا False بودن شرط که منجر به اجرای عملی دیگر میشود.
در این عبارت ابتدا شرط تست میشود, در صورتیکه True شود کدهای بعد از Then اجرا میشوند اما اگر شرط False شود کدهای بعد از Else اجرا میشوند.(دو انتخاب)Dim temperature As IntegerIf temperature>30 ThenMsgbox("very hot")ElseMsgbox("Very nice or cool ")End if
Select Case : با استفاده از این ساختار تصمیم گیری ما قادر به تستهای زیادی هستیم. و میتوانیم چندین آیتم را با هم مد نظر داشته باشیم.
در داخل دستورات شرطی میتوانیم از عملگرهای منطقی استفاده کنیم. در دستور Select قادر به تست در بین دوبازه هستیم.Select Case(متغیر یا عبارت)Case 1 (اولین ایتمی که باید چک شود)Do………Case 2Do…………..……….Case nDo………………Case elseDo…………….End Select
Microsoft.VisualBasic.Switch : این دستور که در vb.net جدید است, لیستی از عبارات یا مقدار را میگیرد و اولین آیتمی را که مقدار True داشته باشد, برمیگرداند.Dim temperature As IntegerSelect temperatureCase >50Do ………………………..Case<30 And >10Do………………………….Case 30 to 50Do …………………………Case Is 30Do ………………………….Case elseDo ……………………………End select
ایتدا عبارت اول چک میشود, در صورتیکه True باشد مقدار برگشتی 1 برگردانده میشود, در غیر این صورت عبارت دوم چک میشود و الی ..........Microsoft.VisualBasic.Switch(مقدار یا متغیر1 , مقدار برگشتی1 ,……….,lمقدار یا متغیر n , مقدار برگشتی n)
Choose : در واقع تابعی است که بر اساس مقدار عددی یک ایندکس, یکی از آیتمهای مشخص شده در لیست را برمی گرداند.
اگر ایندکس مقدار 1 داشته باشد, ایتم 1 , اگر ایندکس 2 ایتم 2 و .......................Choose(index, Choise1,Choice2,…………..,Choisen)
نمونه کد : [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
سلام! آقایون فضول خوان دوباره برگشت!! فکر کنم یک کاشتباه تایپی وجود دارد!
البته ایشان یادشان رفت بگوییند که میتوانید با ویرگول حالت or را ایجاد کنید.نوشته شده توسط anvar.net [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
مثلاً دستورات زیر صحیح هستند.
Case 1,5,7
Case Is>5
Case Is>5, 7
و...
سلام
باز هم عالی بود
فقط یک سوال (مثل همیشه !!!! )
میخوام یک شرط بنویسم مثلا اگر 1 بود عمل 1 رو انجام بده و . . .
خب این شرط رو تقریبا با همه این موارد میشه پیاده سازی کرد . تو محیط c و vb6 ساختار switch یا select\case توصیه میشه ، میخوام بدونم تو محیط net. کدوم ساختار رو از لحاظ برتری سرعتی توصیه میکنن ؟
سلام
من یکبار نوشتم ولی پرید! دوباره از اول .... (از دست این یکی ترنت،آدم یک جورایی پنچر میشود)نوشته شده توسط bad_boy_2007 [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
switch و IIf در VB تابع هستند و دستور نیستند، در نتیجه استفاده کمتر از آنها و استفاده بیشتر از Select Case و If/ElseIf خیلی بهتر است.
اگر میتوانید از Select Case استفاده کنید، اگر نشد If/ElseIf
مثلاً دستور زیر را میتوان با Select Case انجام داد:
کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنیدولی if های با And یا Xor یا چند متغییره را نمیتوان با Case پیاده سازی کرد.کد:برای مشاهده محتوا ، لطفا وارد شوید یا ثبت نام کنید
برنامه نویسان vb قادر به ایجاد حلقه هایی با سه دستور For , Do و While هستند.
حلقه For : مهمترین حلقه vb است و فرم کلی آن بصورت زیر است :
با شروع حلقه متغیر index مقدار Start را به خود میگیرد, هر بار که حلقه تکرار میشود این متغیر با توجه به Step افزایش پیدا میکند (در صورتیکه مقدار Step نوشته نشود vb بصورت پیش فرض مقدار آنرا برابر 1 قرار میدهد). حلقه زمانیکه متغیر index به end رسید خانمه پیدا میکند.(البته میتوان با دستور Exit For حلقه را پایان داد).For index(As DataType)= Start to end [Step X]Do ………..Next [index]
در vb.net بر خلاف ویرایشهای قبلی میتوانیم متغیر حلقه را در خود حلقه تعریف کنیم مانند بالا یا اینکه آنرا ماقبل شروع حلقه تعریف کنیم.
بعنوان مثال مجموع اعداد 1 تا 100 را با استفاده از حلقه For بدست می آوریم :Dim index As integerFor index=0 to nOrFor Index As integer=0 to n
حلقه For Each : این حلقه مشابه با حلقه for است با این تفاوت که (مثلا در آرایه ها یا کلکسیونها) نیازی به دانستن تعداد عناصر نداریم. فرم کلی حلقه بصورت زیر استDim sum,number As integerSum=0For number=0 to 100Sum=sum+numberNexeMsgbox(sum)
در اینجا عناصر موجود در آرایه یا کلکسیون group یکی یکی به متغیر element نسبت داده میشوند.For each element (As datatype) in groupDo ……………Next (element)
حلقه While : این حلقه شرطی را تست میکند, تا زمانیکه شرط true باشد حلقه بکار خود ادامه میدهد. هنگامیکه شرط False ارزیابی شود, برنامه از حلقه خارج و اولین دستور بعد از حلقه انجام می گیرد. فرم کلی حلقه بصورت زیر است: این حلقه بیشتر زمانی بکار می آید که تعداد تکرارها برای ما نامشخص است.
بعنوان مثال با حلقه فوق اولین توان 3 بزرگتر از 3000 را بدست می آوریم :While conditionDo ………………End while
Dim number As integer=3While number<=3000Number=number*3End WhileMsgbox(number)
**** در این حلقه و حلقه Do از سایر توابع vb که مقدار true یا false برمیگردانند میتوان استفاده کرد.
حلقه Do : حلقه Do تا زمانیکه یک شرط true باشد(While) یا نباشد (Until) اجرا میشود, دو نوع حلقه Do داریم. در نوع اول : شرط حلقه در ایتدای آن تست میشود
*** برخلاف ساختارهای While و Do While \ Loop ؛ ساختار تکرار Do Until \ Loop شرط را برای برقرار نبودن (False) چک میکند تا تکرار ادامه یابد.Do while | untile conditionDo ………………Loop
اگر مثالی را که با حلقه While انجام دادیم, بخواهیم با استفاده از حلقه Do Until \ Loop بنویسیم, میشود :
………………………Do until number>3000Number=number*3
در نوع دوم , شرط حلقه در انتهای آن تست میشود, این حلقه حداقل یکبار اجرا میشود.
DoDo ………………..Loop (while | untile)
سلام
ممنون خوب بود.
میشه در مورد try هم توضیح بدین ؟
تو کتاب من در مورد try توضیحی نداده ولی چند نمونه برنلمه هست که از این دستور استفاده کرده
فكر مي كنم كه قبل از هر چيز لازم باشه در مورد كلاس و Oop به صورت كامل بحث بشه
یه بحث کوچک واسه روالها و توابع مونده, بعدش کنترل استثناها (try) بعدش هم بطور کاملا تخصصی OOP رو شروع میکنم, البته اگه عمری باشه و توفیق بشه.
هم اکنون 1 کاربر در حال مشاهده این تاپیک میباشد. (0 کاربر عضو شده و 1 مهمان)