コンテンツにスキップ

ENUMVAR系

関数名 引数 戻り値
ENUMVARBEGINSWITH string int
ENUMVARENDSWITH string int
ENUMVARWITH string int

API

int ENUMVARBEGINSWITH keyword
int ENUMVARENDSWITH keyword
int ENUMVARWITH keyword

定義された変数・定数名でkeywordを含んでいる変数・定数の総数を返す
また、keywordを含む変数・定数名をRESULTSの配列に代入する

  • ENUMVARBEGINSWITHは,keywordで始まる変数・定数名を返します。
  • ENUMVARENDSWITHは,keywordで終わる変数・定数名を返します。
  • ENUMVARWITHは,keywordを含んだ変数・定数名を返します。

注意

EXISTVARと違って,ローカル変数・定数を列挙しません。

ヒント

命令、式中関数両方対応しています。

DEFINE.ERH
#DIMS CONST Foo1 = "1"
#DIM Foo2, 2, 2
#DIMS CONST Foo3 = "3", "4"
#DIM MyFoo 
MAIN.ERB
@SYSTEM_TITLE
    #DIMS Local3DFoo, 2, 2, 2

    PRINTFORML "Foo"で始まる変数・定数名の数:{ENUMVARBEGINSWITH("Foo")}
    ENUMVARENDSWITH "Foo"
    PRINTFORML "Foo"で終わる変数・定数名の数:{RESULT}
    CALL PrintFoo
    ENUMVARWITH "Foo"
    PRINTFORML "Foo"を含んだ変数・定数名の数:{RESULT}
    CALL PrintFoo

    ONEINPUT

@PrintFoo
    #DIM i
    FOR i, 0, RESULT
        SIF i>0
            PRINT , 
        PRINTS RESULTS:i
    NEXT
    PRINTL
結果
"Foo"で始まる変数・定数名の数:3
"Foo"で終わる変数・定数名の数:1
MyFoo
"Foo"を含んだ変数・定数名の数:4
Foo1, Foo2, Foo3, MyFoo

関連項目