【单选题】

在窗体中有一个命令按钮command1，编写事件代码如下：

Private SubCommand1_Click()
Dim sAs Integer
s=P(1)+P(2)+P(3)+P(4)
Debug.Print s
End Sub
Public Function P(NAs Integer)
Dim SumAs Integer
Sum=0
For i=1 To N
Sum=Sum+1
Next i
P=Sum
End Function
打开窗体运行后，单击命令按钮，输出的结果是
A．15
B．20
C．25
D．35