![[填空题] 设有命令按钮Command1的单击事件过程，代码如下，请填空。 Private Sub Command1_Click() Dim a(30)As Integer For i=1 To 3](http://www.mshxw.com/aiimages/31/261811.png "[填空题] 设有命令按钮Command1的单击事件过程，代码如下，请填空。 Private Sub Command1_Click() Dim a(30)As Integer For i=1 To 3")
[填空题] 设有命令按钮Command1的单击事件过程，代码如下，请填空。 Private Sub Command1_Click() Dim a(30)As Integer For i=1 To 30 a(i)=i Next For Each arrItem ______ a If arrItem Mod 7=0 Then Print arrItem； If arritem＞90 Then Exit For Next End Sub
参考答案：
In问题解析:
本题考查了For Each…Next语句。与For…Next类似，但For，Each…Next专门用于数组或对象“集合”，其一般格式为： For Each成员In数组 循环体 [Exit For] …… Next[成员]
