选择题
在窗体中有一个命令按钮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
打开窗体运行后,单击命令按钮,输出结果是______。