单选题 下列程序运行时输出的结果是 ____ 。
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