设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1_Click() Dim a As Integer For i=1 To 30 a(i)=i Next For Each arrItem 【 】a

admin2010-11-20  13

问题 设有命令按钮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
请填空。

选项

答案In

解析 本题考查了For Each 匩ext语句,与For 匩ext类似。但For Each 匩ext 专门用于数组或对象"集合",其一般格式为:
For Each 成员 In 数组
循环体
[Exit For]

Next[成员]
转载请注明原文地址:https://kaotiyun.com/show/Xqmp777K
0

最新回复(0)