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

admin2009-03-15  22

问题 设有命令按钮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
0

最新回复(0)