问题
填空题
设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=i
Next
For Each arrItem 【13】 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[成员]