单选题 设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=Int(Rnd* 100)
Next
For Each amrItem In a
If arrItem Mod 7=0 Then Print arrItem;
If arrItem＞90 Then Exit For
Next
End Sub
对于该事件过程，以下叙述中错误的是______。