場所がどこでもよくて１文字ずつ表示させるだけなら こんな感じですね FOR I=0 TO LEN(S$)-1 BEEP 9 '←音を追加するならこの辺りにBEEPを入れる PRINT MID$(S$,I,1) WAITE 10 '← WAITE等入れないと多分早すぎて一瞬で表示される NEXT MID$()は文字を取り出す命令です ここで1文字ずつ取りだしてPRINTします 文字の表示位置を変えたい場合はLOCATEを使いましょう 会話ウィンドウなど横幅を20文字にするなどの処理を行う場合は 字数をカウントしてLOCATE文と組み合わせて使う事になります