单项选择题

有如下程序:
Option Base 1
Private Sub Form_Click()
Dim Xyz(50)
For i=1To 5
j=i*i
Xyz(j)=j
Next i
Print Xyz(25)
End Sub
程序运行时输出的结果是()。

A.36
B.出错信息
C.16
D.25