IBM Lotus Symphony


Select...Case ステートメント [実行時]

1 つまたは複数のステートメントブロックを、与えられた表式に応じて選択します。

構文:

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

パラメータ:

Condition: 個々の Case 節に続くステートメントブロックを実行するかの判定基準となる表式。

Expression: Condition の判定基準と対比させる、同じ変数型の表式。各 Case 節に続くステートメントブロックは、該当する ExpressionCondition と一致した場合にのみ実行されます。

例:

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


製品フィードバック | その他の資料 | 商標