A=INSTR("* ｡｢",S$[I]) IF A<0 THEN .... とすると、飛ばしたい文字がもっと増えたときに ("!" とか "?" とか "､" とか）対応しやすいかも。