VBScript For...Each 循环

当我们想要为数组或集合中的每个元素执行一条语句或一组语句时，使用 For Each 循环。

For Each 循环与 For 循环类似； 但是，循环是针对数组或组中的每个元素执行的。 因此，这种类型的循环中不存在步数计数器，它主要与数组一起使用，或者在文件系统对象的上下文中使用，以便递归操作。

语法

VBScript 中 For Each 循环的语法是 −

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

示例

<!DOCTYPE html>
<html>
   <body>
      <script language = "vbscript" type = "text/vbscript">
         'fruits is an array 
         fruits = Array("apple","orange","cherries")
         Dim fruitnames

         'iterating using For each loop. 
         For each item in fruits
            fruitnames = fruitnames&item&vbnewline
         Next

         msgbox fruitnames
         
      </script>
   </body>
</html>

当执行上述代码时，它会打印所有水果名称，每行一项。

apple
orange
cherries

vbscript_loops.html