单选题 设有如下程序： 　　Option Base 1 　　Private Sub Form Click() 　　Dim a(5)As String，i As Integer 　　For i=1 To 5 　　 a(i)=Chr(Asc("A")+i) 　　 Call f(a，i) 　　Next i 　　End Sub 　　Sub f(ta()As String，n As．Integer) 　　Dim i As Integer 　　For i=1 To n 　　 Print ta(i)； 　　Next i 　　Print 　　End Sub 　　对上述程序．以下叙述中正确的是( )。