下面程序的输出结果是 1。Private Sub Commandl_Click( )Dim a(1 To 20)Dim iFori = 1 To 20a(i) = iNext iFor Each i In a( )a(i) = 20Next iPrint a(2)End Sub
【正确答案】
1、正确答案:20
【答案解析】解析:For Each... Next语句是针对数组和集合中的每一个元素进行一次操作的语句组合。本题定义了一个数组,然后利用For循环将1-20赋给数组元素,又利用For Each... Next语句将数组的每一个元素定义为20,故输出结果为20。