下列程序的输出结果是【 】。

Private Sub Command1_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