问题 填空题

下列程序的输出结果是 【16】 。Private Sub Command1_Click()Dim a(1 To 20)Dim iFor i=1 To 20 a(i)=iNext iFor Each i In a() a(i)=20Next i Print a(2)End Sub

答案

参考答案:T

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

单项选择题
填空题