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

admin2013-04-11  23

问题 设有命令按钮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://kaotiyun.com/show/jqhp777K
0

相关试题推荐
最新回复(0)