已知函数sum（k,n）=1^k+2^k+3^k…+n^k.计算当k=2,n=5时的结果.

已知函数sum（k,n）=1^k+2^k+3^k…+n^k.计算当k=2,n=5时的结果.
Private Function Power(a As Integer,b As Integer) As Long
Dim i As Integer,t As Long
t = 1
For i = 1 To a
#####[1]##### '第1空
Next i
#####[2]##### '第2空
End Function
Private Function Sum(k As Integer,n As Integer) As Long
Dim i As Integer,s As Integer
For i = 1 To n
s = s + Power(#####[3]##### ) '第3空
Next i
Sum = s
End Function
Private Sub Form_Click()
Dim k As Integer,n As Integer,s As Long
k = 2
n = 5
s=#####[4]##### '第4空
Print s
End Sub