>>13
ありがとうございます。無事動きました。
２個目以降の単語も検索できるように改造してみます。

ＶＢ始めて間もないですが、難しいです本当…