RESTOREステートメントは、文字列で指定出来るので、下記の様にすれば何うですか。 OPTION STRICT ACLS DIM N,A$ N=RND(3) RESTORE "@P"+STR$(N) READ A$ : PRINT A$ @P0 : DATA "AAA" @P1 : DATA "BBB" @P2 : DATA "CCC"