前のまげさんのサンプルをベースに。 6行目に以下を入れて下さい。 M$="" 8行目を以下に変えて下さい。  M$=M$+MID$(Q$,I,1) 11行目を削除します。 13行目にLOCATE分を入れます。 14行目を以下の様に変更します。 PRINT M$ いかがでしょう?