下列程序运行的结果是（ ）。Private Sub Command1_Click() Dim a(6) As Integer, b(6) As Integer n = 5 For i = 1 To 6 a(i) = i b(i) = i ^ 2 - n Next i Print a(n); b(n)End Sub