خوش آموز درخت تو گر بار دانش بگیرد، به زیر آوری چرخ نیلوفری را
دستور Select...Case در ویژوال بیسیک دات نت
دستور Select...Case در ویژوال بیسیک، بسته به مقدار عبارتهای شرطها، یکی از گروه دستورات را اجرا می کند.
اگر قسمت testexpression با هر کدام از شرطهای موجود در Case ها مطابقت کند، ابتدا دستورات موجود در بدنه آن case اجرا می شود و سپس کنترل کد به انتهای دستور یعنی End Select می رود. اگر عبارت testexpression با بیش از یک عبارت در قسمت case ها مطابقت داشته باشد، فقط case اول اجرا می شود و از case های بعدی صرفنظر می گردد و کنترل کد به دستور End Select میرود.
دستور Case Else که اختیاری می باشد، برای مواقعی کاربرد دارد که هیچ کدام از شرطها برقرار نباشند، هر چند این گزینه اختیاری است اما بهتر است برای حالتهای پیش بینی نشده در آن قسمت کدهای لازم را بنویسید.
شما می توانید در عبارت مربوط به یک case چندین عبارت ترکیبی را بنویسید. بعنوان مثال دستور زیر صحیح می باشد.
شما در مورد مقادیر رشته ای نیز می توانید از بازه ها استفاده کنید. دستور زیر صحیح می باشد.
هر جا که ضرورت داشته باشید می توانید با دستور Exit Select از دستور خارج شوید و کنترل کد به انتهای دستور می رود.
ساختار Select Case می تواند بصورت تو در تو نوشته شود.
متن زیر قابل کپی کردن می باشد.
نحوه نگارش (Syntax) دستور Select...Case
تشریح قسمتهای مختلف دستور Select...Case
-
testexpression : عبارت اصلی که باید مورد ارزیابی قرار گیرد. این عبارت می تواند از نوع Boolean، Byte، Char، Date، Double، Decimal، Integer، Long، Object، SByte، Short، Single، String، UInteger، ULong، و یا UShort باشد.
-
expressionlist : لیست عبارتهای شرطی که مقدارشان با testexpression مطابقت داده می شود. اگر از چندین عبارت مختلف استفاده کنید باید آنها را با کاما (comma) از یکدیگر جدا کنید. هر کدام از این عبارتهای شرطی می تواند یکی از فرمتهای زیر را داشته باشد :
-
statements : دستورات برنامه نویسی در این قسمت قرار می گیرند و اگر شرط برای هر ناحیه ای برقرار باشد، دستورات موجود در آن قسمت اجرا می شوند.
-
elsestatements : اگر هیچکدام از شرطها مطابقت نکند این قسمت که بعد از Case Else قرار می گیرد اجرا خواهد شد.
-
End Select : دستور Select...Case را خاتمه می دهد.
توضیحات دستور Select...Case
اگر قسمت testexpression با هر کدام از شرطهای موجود در Case ها مطابقت کند، ابتدا دستورات موجود در بدنه آن case اجرا می شود و سپس کنترل کد به انتهای دستور یعنی End Select می رود. اگر عبارت testexpression با بیش از یک عبارت در قسمت case ها مطابقت داشته باشد، فقط case اول اجرا می شود و از case های بعدی صرفنظر می گردد و کنترل کد به دستور End Select میرود.
دستور Case Else که اختیاری می باشد، برای مواقعی کاربرد دارد که هیچ کدام از شرطها برقرار نباشند، هر چند این گزینه اختیاری است اما بهتر است برای حالتهای پیش بینی نشده در آن قسمت کدهای لازم را بنویسید.
شما می توانید در عبارت مربوط به یک case چندین عبارت ترکیبی را بنویسید. بعنوان مثال دستور زیر صحیح می باشد.
Case 1 To 4, 7 To 9, 11, 13, Is > maxNumber
شما در مورد مقادیر رشته ای نیز می توانید از بازه ها استفاده کنید. دستور زیر صحیح می باشد.
Case "apples", "nuts" To "soup", testItem
هر جا که ضرورت داشته باشید می توانید با دستور Exit Select از دستور خارج شوید و کنترل کد به انتهای دستور می رود.
ساختار Select Case می تواند بصورت تو در تو نوشته شود.
مثال از نحوه استفاده دستور Select...Case
متن زیر قابل کپی کردن می باشد.
Dim number As Integer = 8
Select Case number
Case 1 To 5
Debug.WriteLine("Between 1 and 5, inclusive")
' The following is the only Case clause that evaluates to True.
Case 6, 7, 8
Debug.WriteLine("Between 6 and 8, inclusive")
Case 9 To 10
Debug.WriteLine("Equal to 9 or 10")
Case Else
Debug.WriteLine("Not between 1 and 10, inclusive")
End Select
Select Case number
Case 1 To 5
Debug.WriteLine("Between 1 and 5, inclusive")
' The following is the only Case clause that evaluates to True.
Case 6, 7, 8
Debug.WriteLine("Between 6 and 8, inclusive")
Case 9 To 10
Debug.WriteLine("Equal to 9 or 10")
Case Else
Debug.WriteLine("Not between 1 and 10, inclusive")
End Select
نمایش دیدگاه ها (0 دیدگاه)
دیدگاه خود را ثبت کنید: