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

admin2010-11-20  27

问题 设有命令按钮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[成员]
转载请注明原文地址:https://jikaoti.com/ti/lpg0FFFM
0

最新回复(0)