填空题

设有命令按钮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