instr 命令で検索して strmid 命令で必要な部分を取っておいて、
最後に全て組み合わせるっという感じで作って見ました。
sdim txt,1024
ipt1=""
ipt2=""
pos 200,0
objsize 100,50
button "置換",*tikan
pos 100,0
objsize 100,25
input ipt1
input ipt2
pos 0
mesbox txt,640,430
idmb=stat
pos 0,0 :mes "置換する文字"
pos 0,25 :mes "置換後の文字"
stop
*tikan
/* 置換処理 */
//文字列検索
index=instr(txt,0,ipt1)
if index=-1 :dialog "見つかりませんでした" :stop
//文字サイズ取得
txtlen=strlen(txt)
len1=strlen(ipt1)
//必要な部分(置き換え文字列より後ろ)を取っておく。
buf=strmid(txt,index+len1,txtlen-index-len1)
//置換文字が見つかった所を終端にする。
poke txt,index,0
//終端部分に必要部分を結合し再構築
txt+=ipt2+buf
//mesbox に反映
objprm idmb,txt
//現在の文字数表示
title ""+strlen(txt)
stop