DATAそれぞれに@で名前を付けて、 RESTOTE "@DATA"+STR$(RND(3)+1) READ A$ ?A$ のようにするか、 配列に全てのデータを読み込んでからランダムで呼び出す DIM MOJI$[3] COPY MOJI$,@DATA1 ?MOJI$[RND(3)] とか、方法は色々です。