问题详情

设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click()
Dim a 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
请填空。请帮忙给出正确答案和分析，谢谢！