119行目のINSTR関数ですが第1引数の文字列の中に第2引数の 文字列を含む場合に第1引数の文字列の何文字目から始まっている かを返します。 119行目のINSTR関数で指定しているQ$[I]とYOKEN$を入れ替えて みたら変化有りますか？