下列程序的执行结果是（)。Function P（N As Integer)For i=1 To NSum=Sum+iNext iP=SumEnd Functio

下列程序的执行结果是()。

Function P(N As Integer)

For i=1 To N

Sum=Sum+i

Next i

P=Sum

End Function

Private Sub Command1_Click()

S=P(1)+P(2)+P(3)+P(4)

Print S;

End Sub

A．15

B．16

C．20

D．25