一つ目の画像を参考にして配列にするならこんな感じ？ DIM SP[26] FOR N=0 TO LEN(SP)-1 SP[N]=RND(1489) NEXT