问题
填空题
下列程序的输出结果是【15】。 Private Sub Command l Click() Dim a(1 TO 20) Dim i For i=1 TO 20 a(i)=i Next i For Each i In a() a(i)=20 Next i Print a(2) End Sub
答案
参考答案:T
解析: 本题考查For Next…Each语句的用法,For Next…Each语句是针对数组和集合中的每一个元素进行…次操作的语句组合。本题定义了一个数组,然后利用For循环将1~20赋给数组元素,又利用For Each Next语句将数组的每一个元素定义为20,故输出结果为20。