VB中for each next怎么使用

来源：百度知道 编辑：UC知道 时间：2024/06/28 20:02:47
我想知道，这个语句的使用，方法，
例如
Private Sub Command1_Click()
Dim a
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)
For Each c In a
Print c
Next c
End Sub
结果，是输出，a数组中的每个元素，为什么，要有个c in a我不明白为什么，而且，那里有定义c的语句，就有了了，还有，这个语句，还有什么作用，我现在都晕了。

For Each ... In ...是VB的一个特色，对于循环遍历数组中得所有元素非常方便。而且字面意思就很人性化，不是么？直译过来就是：对于每一个a中的 c 怎么样怎么样，是吧。 c定不定义都无所谓的，你也可以定义啊，无关大局。但是注意，For Each In Next语句只能识别变体类型变量，所以如果要定义，必须Dim c As Variant 或者Dim c才可以。

For Each...Next 语句

针对一个数组或集合中的每个元素，重复执行一组语句。

语法

For Each element In group
[statements]
[Exit For]
[statements]

Next [element]

For...Each...Next 语句的语法具有以下几个部分：

部分 描述
element 必要参数。用来遍历集合或数组中所有元素的变量。对于集合来说，element 可能是一个 Variant 变量、一个通用对象变量或任何特殊对象变量。对于数组而言，element只能是一个 Variant 变量。
group 必要参数。对象集合或数组的名称（用户定义类型的数组除外）。
statements 可选参数，针对 group 中的每一项执行的一条或多条语句。

说明

如果集合中至少有一个元素，就会进入 For...Each 块执行。一旦进入循环，便先针对 group 中第一个元素执行循环中的所有语句。如果 group 中还有其它的元素，则会针对它们执行循环中的语句，当 group 中的所有元素都执行完了，便会退出循环，然后从 Next 语句之后的语句继续执行。

在循环中可以在任何位置放置任意个 Exit For 语句，随时退出循环。Exit For经常在条件判断之后使用，例如If匮hen，并将控制权转移到紧接在 Next 之后的语句。

可以将一个 For...Each...Next 循环放在另一个之中来组成嵌套式 For...Each...Next 循环