问题 单项选择题

设有命令按钮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语句没有语法错误。

判断题
单项选择题