下列程序的输出结果是【】 Private Sub Command1_Click() Dim a(1 To 20) Dim i For i=l To 20 a(i)=i Next i For Each i In a() a (i) =20 Next i

admin2009-05-20 65

问题下列程序的输出结果是【】
Private Sub Command1_Click()
Dim a(1 To 20)
Dim i
For i=l To 20
a(i)=i
Next i
For Each i In a()
a (i) =20
Next i

选项

答案20

解析本题考查For Next...Each语句的用法，For Next...Each语句是针对数组和集合中的每一个元素进行一次操作的语句组合，具体格式我们前面已经有详细介绍。本题定义了一个数组，然后利用For循环将1-20赋给数组元素，又利用For Each Next语句将数组的每一个元素定义为20，故输出结果为20。

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

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