问题
单项选择题
设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30) As Integer
For i=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem＞90 Then Exit For
Next
End Sub
对于该事件过程，下列叙述中错误的是
A．a数组中的数据是30个100以内的整数
B．语句For Each arrItem In a有语法错误
C．If arrItem Mod 7=0…语句的功能是输出数组中能够被7整除的数
D．If arrItem＞90…语句的作用是当数组元素的值大于90时退出For循环
答案
参考答案：A
解析： For Each…Next语句专门用于数组或对象“集合”，其一般格式为：
[*]
用For Each…Next语句可以对数组元素进行处理，包括查询、显示、读取。它所重复执行的次数由数组中元素的个数确定。本题程序中首先定义了一个包含31个元素的数组，然后通过循环语句赋给下标为1～30的元素各一个100以内的非负整数，最后通过For Each…Next语句输出数组中能够被7整除的数，当数组元素的值大于90时退出For循环。故选项A不正确。