选择题 34.  在窗体中有一个命令按钮Command1，编写事件代码如下：
    Private Sub CommandlClick()
    Dim sAs Integer
    S=P(1)+P(2)+P(3)+P(4)
    debug. Print S
    End Sub
    Public Function P(N AS Integer)
    Dim Sum As Integer
    Sum=0
    For i=1 To N
    Sum=Sum+i
    Next i
    P=Sum
    End Funetion
    打开窗体运行后，单击命令按钮，输出结果是______。