[填空题] 设有命令按钮Command1的单击事件过程，代码如下： Private Sub Command1

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