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

admin2009-03-15 39

问题设有命令按钮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专门用于数组或对象“集合”其一般格式为：

转载请注明原文地址:https://kaotiyun.com/show/yJ1p777K

本试题收录于：二级VB题库NCRE全国计算机二级分类