为计算a“的值，某人编写了函数power如下：Private Function power（a As Integer，n As Integer)As L

为计算a“的值，某人编写了函数power如下：

Private Function power(a As Integer，n As Integer)As Long

Dim P As Long

P=a

For k=l T0 n

P=P * a

Next k

poWer=P

End Function

在调试时发现是错误的，例如Print power(5，4)的输出应该是625，但实际输出是3125。程序需要修改。下面的修改方案中有3个是正确的，错误的一个是

A．把For k=1 To n改为For k=2 To n

B．把P=P*a改为P=p^n

C．把Fork=1 To n改为For k=1 To n-1

D．把P=a改为P=1