2017年11月
      1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30    
無料ブログはココログ

« For Each Inループの途中脱出の判定方法 | トップページ | テキストファイルから、開始文字列~終了文字列の行を抜き出すバッチ »

2007年3月 5日 (月)

For Index To Stepループの途中脱出の判定方法

インデクスの満了値(To+Step)を判定すれば確実ではありますが、
これもあまり好きではありません。

For Index=0 To Items.Count-1
  If Items(Index)... Then Exit For
Next
If Index<Items.Count Then 途中脱出

インデクスの満了値が0になるようにして、0判定にしたいところです。

For Index=Items.Count To 1 Step -1
  If Items(Index-1)... Then Exit For
Next
If Index>0 Then 途中脱出

« For Each Inループの途中脱出の判定方法 | トップページ | テキストファイルから、開始文字列~終了文字列の行を抜き出すバッチ »