Crystal Reports Designer  

For/Next ループから抜ける(Basic 構文)

For/Next ループから抜けるには、Exit For ステートメントを使用します。次の例では、グローバル配列 names から“Fred”を検索しています。その名前が見つかった場合は、配列内のインデックスが返されます。見つからなかった場合は、-1 が返されます。たとえば、名前の配列が

Array ("Frank", "Helen", "Fred", "Linda")

である場合、次の式は 3 を返します。

Global names () As String
'names 配列はほかの式で初期化され
'値が代入されているとします
Dim i
formula = -1
'UBound 関数は配列を引数として
'そのサイズを返します
For i = 1 to UBound (names)
If names (i) = "Fred" Then
formula = i
Exit For
End If
Next I

参照

For/Next ループ