设有命令按钮Command1的单击事件过程，代码如下，请填空。 Private Su

问题填空题

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

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