[填空题] 设有命令按钮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

参考答案：

● 参考解析

本题考查了ForEach…Next语句。与For…Next类似，但ForEach…Next专门用于数组或对象“集合”，其一般格式为：ForEach成员In数组循环体[ExitFor]Next[成员]