1文字限定ならこんなのが使えますね。 REPEAT ON INSTR("ABC",C$) GOTO @A,@B,@C:GOTO @DEFAULT @A ... BREAK @B @C ... BREAK @DEFAULT ... BREAK UNTIL TRUE