在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为

问题单项选择题

在窗体上画4个文本框，并用这4个文本框建立一个控件数组，名称为Text1(下标从0开始，自左至右顺序增大)，然后编写如下事件过程：
Private Sub Command1_Click()
For Each TextBox In Text1
Text1(i)=Text1(i).Index
i=i+1
Next
End Sub
程序运行后，单击命令按钮，4个文本框中显示的内容分别为( )。

A．0 1 2 3

B．1 2 3 4

C．0 1 3 2

D．出错信息

答案

参考答案：A

解析：本题考查For Each in的用法。For Each in是针对一个数组或集合中的每个元素，重复执行一组语句。语法格式：
For Each element In group
[Statements]
Next [element]
注意：element为必选参数，用于遍历集合或数组中所有元素的变量。对于集合来说，element可能是一个Variant变量、一个通用对象变量或任何特殊对象变量。group为必选参数，表示对象集合或数组的名称。statements为可选参数，针对group中的每一项执行的一条或多条语句。题目中表示从文本框的集合中一次取出所有元素，把其Index属性的值填写到文本框中。