为计算an的值，某人编写了函数power如下：
Private Function power(a As Integer,n As Integer)As Long
Dim P As Long
P=a
For k=1 To 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．把For k=1 T0 n改为For k=1 To n-1
D．把p=a改为p=1
