填空题
设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1_Click() Dim a(30)As Integer For i=1 To 30 a(i)=i Next For Each arrItem{{U}} 【13】 {{/U}}a If arrItem Mod 7=0 Then Print arrItem: If arrItem>90 Then Exit For Next End Sub 请填空。
1、
【正确答案】
1、In
【答案解析】
[解析] 本题考查了For Each…Next语句,与For… Next类似。但For Each…Next专门用于数组或对象“集合”其一般格式为: For Each成员In数组 循环体 [Exit For] …… Next[成员]
提交答案
关闭