``

前頁 メニュー 次頁

    select構文(select-case区)  ☆

      SELECT CASE行に書かれた式の値と一致するCASE項目に続くブロックを実行する。
      一致する項目がないと，CASE ELSE以降を実行する。
    例
    INPUT m
    SELECT CASE m
    CASE 1,3,5,7,8,10,12
       LET d=31
    CASE 4,6,9,11
       LET d=30
    CASE 2
       LET d=28
    CASE ELSE
       PRINT "?"
    END SELECT
    PRINT d
    END

    CASE行には，コンマで区切って複数の照合項目を書くことができる。
    ただし，照合項目には定数しか書けない。
      範囲を示すのに
    CASE  定数 TO 定数
    のように書くこともできる。また，
    　IS 比較演算子 定数
    の形の照合項目も書ける。これらをコンマで区切って複数並べることもできる。
    例
    SELECT CASE 2*x-3
    CASE 0 TO 2
       PRINT "y"
    CASE IS <0, IS >2
       PRINT "n"
    END SELECT

      照合項目は，上の行から順にテストされる。一旦，いずれかのCASE行の照合項目に一致すると，以後のCASE行はテストされない。
      CASE ELSEを省略すると，実行時に一致するCASE項目がないとき，EXTYPE=10004の例外が発生する。
      SELECT CASE行には，数値式，文字列式のいずれでも書ける。照合項目は，それに対応する定数でなければならない。