选择题   在窗体中有一个命令按钮Command1,编写事
    件代码如下:
    Private Sub Command1_Click()
    Dim s As Integer
    s=p(1)+p(2)+p(3)+p(4)
    debug.Print s
    End Sub
    Public Function P(N As Integer)
    Dim Sub As Integer
    Sum=0
    For i=1 To N
    Sum=Sum+i
    Next i
    P=Sum
    End Function
    打开窗体运行后,单击命令按钮,输出结果是______。
 
【正确答案】 B
【答案解析】单击命令按钮将触发Click事件,事件代码中4次调用了函数过程P()。函数P(N)的作用是计算1+2+...+N的和,所以P(1)=1,P(2)=1+2=3,P(3)=1+2+3=6,P(4)=1+2+3+4=10,s=P(1)+P(2)+P(3)+P(4)=1+3+6+10=20。