やりたい事は、多分「10枚のカードの中から重複なしに、任意の4枚を選ぶ」的な事ですよね。 方法は、いろいろ有りますが、フラグを立てるか、SWAP命令を使うか、になると思います。 いずれにせよ、配列とFOR NEXT は、必要かも？ DIM A[10] FOR I=0 TO 9 A[I]=I NEXT まず、これで0から9の番号が、箱Aの中に順番に入ります