问题 填空题

下面程序的输出结果是 【15】 。 Private Sub Commandl_Click( ) Dim a(1 To 20) Dim i Fori = 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 Each... Next语句是针对数组和集合中的每一个元素进行一次操作的语句组合。本题定义了一个数组,然后利用For循环将1-20赋给数组元素,又利用For Each... Next语句将数组的每一个元素定义为20,故输出结果为20。

问答题 简答题
单项选择题