For Each...Next循环与For...Next循环类似,但For Each...Next语句不是将语句运行指定的次数,而是对于数组中的每个元素或对象集合中的每一项重复一组语句。这在不知道集合中元素的目数时非常有用。其语法格式如下:
For Each element in group
[statements]
[Exit For]
Next
其中element为元素变量,group为数组或者对象的集合,statements表示要循环执行的语句,方括号[]中的部分表示可有可无。如果group中有至少一个元素,就会进入For Each块执行。一旦进入循环,便首先对group中的第一个元素执行循环中的所有语句。只要group中还有其他的元素,就会对每个元素执行循环中的语句。当group中没有其他的元素时就会退出循环,然后从Next语句之后的语句继续执行。
For Each...Next语句的示例如下。
for each item in Request.Form("cUserID")
if item<>"" then
IDifclosed=true
Else
IDifclosed=false
Next
这段代码表示逐项遍历Form表单中名称为cUserID的每一项元素,并根据其是否为空进行不同的处理。