投稿日 | : 2003/12/17(Wed) 20:43 |
投稿者 | : Tomo |
Eメール | : |
URL | : |
タイトル | : 追加質問です |
追加ですみませんが、
> ' 内側 Loop
> Do Until objKey.AtEndOfStream
> fndKey = objKey.ReadLine
> fndItem = Filter(fndItem, fndKey, False, vbTextCompare)
> Loop
この時、Filter で省かれた時点で Loop を抜けたい場合どうすれば
抜けれますでしょうか?
恐らく配列になっている為だと思いますが、If 文で "" や Null 等
指定して試しましたがエラーになって仕舞い上手くいきません。
弾かれた時点で抜けれれば大分処理を短縮出来そうなのですが。
(Keyword が数百単位になる為)
宜しくお願いします。