IBM Lotus Symphony


‏‎Select...Case Statement [Runtime]‎‏

يتم تعريف كتلة عبارات statement block أو أكثر وفقا لقيمة التعبير.

الصيغة:

Select Case condition Case expression Statement Block [Case expression2 Statement Block][Case Else] Statement Block End Select

المعاملات:

Condition: أي تعبير يقوم بالتحكم في ما اذا كان سيتم تنفيذ statement block التي تتبع Case clause المناظرة.

Expression: أي تعبير متوافق مع تعبير Condition type expression. يتم تنفيذ statement block التي تلي Case clause اذا كان Condition يطابق Expression.

مثال:

Sub ExampleRandomSelect

Dim iVar As Integer

‏‎iVar = Int((15 * Rnd) -2)‎‏

Select Case iVar

Case 1 To 5

‏‎Print "Number from 1 to 5"‎‏

Case 6, 7, 8

‏‎Print "Number from 6 to 8"‎‏

Case 8 To 10

‏‎Print "Greater than 8"‎‏

Case Else

Print "Out of range 1 to 10"

End Select

end sub


التعليق التقييمي عن البرنامج | المزيد من المطبوعات الفنية | العلامات التجارية