问题
单项选择题
设有命令按钮Command1的单击事件过程,代码如下:
Private Sub Command1_Click()
Dim a(30) As Integer
For i=1 To 30
a(i)=Int(Rnd*100)
Next
For Each arrItem In a
If arrItem Mod 7=0 Then Print arrItem
If arrItem>90 Then Exit For
Next
End Sub
对于该事件过程,以下叙述中错误的是()。
A.a数组中的数据是20个100以内的整数
B.语句For Each arrItem In a有语法错误
C.If arrItem Mod 7=0……语句的功能是输出数组中能够被7整除的数
D.If arrItem>90……语句的作用是当数组元素的值大于90时退出For循环
答案
参考答案:B
解析:
[评析] For Each语句的基本语法结构为: For Each 变量 In 数组 语句块 Next[变量] 本题中For Each语句没有语法错误。