单项选择题

下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click()  Const a=6  Dim x (a) As Integer  For I=1 to a   x(i)=1^2  Next I  Print x(i) End Sub

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