VBA For Each循环

VBA For Each循环

作者： MrHello Java技术QQ群：227270512 / Linux QQ群：479429477

For Each循环用于为数组或集合中的每个元素执行语句或一组语句。
For Each循环与For循环类似; 然而，For Each循环是为数组或组中的每个元素执行的。 因此，这种类型的循环中将不存在步计数器。 它主要用于数组或在文件系统对象的上下文中使用，以便递归操作。

语法

以下是VBA中For Each循环的语法。

For Each element In Group
   [statement 1]
   [statement 2]
   ....
   [statement n]
   [Exit For]
   [statement 11]
   [statement 22]
Next

Vb

示例

Private Sub Constant_demo_Click()  
   'fruits is an array
   fruits = Array("苹果", "橙子", "樱桃")
   Dim fruitnames As Variant

   'iterating using For each loop.
   For Each Item In fruits
      fruitnames = fruitnames & Item & Chr(10)
   Next

   MsgBox fruitnames
End Sub

Vb

当执行上面的代码时，它会在每行中打印一个项目的所有水果名称。

原文出自【易百教程】，商业转载请联系作者获得授权，非商业转载请保留原文链接：https://www.yiibai.com/vba/vba_foreach_loop.html