Crystal Reports  

退出 For/Next 循环(Basic 语法)

使用 Exit For 语句可以从 For/Next 循环中退出。以下示例在全局数组名称中搜索名称“Fred”。如果找到了该名称,将返回该名称在数组中的索引。否则返回 –1。例如,如果名称数组是:

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

则公式返回 3。

Global names () As String
'The names array has been initialized and filled
'in other formulas
Dim i
formula = -1
'The UBound function returns the size of its array
'argument
For i = 1 to UBound (names)
   If names (i) = "Fred" Then
      formula = i
      Exit For
   End If
Next I

另请参见

For/Next 循环