繰り返さないDo Loop

今、修正してるソース。

Try
  Do
    IfThen
      処理
      Exit Do
    End If

    IfThen
      処理
      Exit Do
    End If

    IfThen
      処理
      Exit Do
    End If
  Loop While False
Catch
  〜
Finally
 〜
End Try

このDo Loopの意図がさっぱり解らんかったのだがやっと解った。Ifで偽になった時点でそれ以降のIfをくぐらせたくない、ってことなんだろう。Do Loopをこんな事に使うとは・・・。

Try
  IfThen
      処理
  ElseIfThen
      処理
  ElseIfThen
      処理
  End If
Catch
  〜
Finally
 〜
End Try

これでいいべよ。

Try
  IfThen
    処理
    Exit Try
  End If

  IfThen
    処理
    Exit Try
  End If

  IfThen
    処理
    Exit Try
  End If
Catch
  〜
Finally
 〜
End Try

百歩ゆずってこれ。でも無駄に長い。
反復処理以外にDo Loopは無しで。