PMP考试

【单选题】在窗体中有一个命令按钮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

网考网参考答案：B
网考网解析：
[解析] 本题考查的是VBA编程基础、参数传递。此题为循环结构： 当N=1:i=1，Sum=0+1=1，所以P(1)=1； 当N=2:i=1，Sum=0+1=1，i=2，Sum=1+2=3，所以P(2)=3； 当N=3:i=1，sum=0+1=1，i=2，sum=1+2=3，i=3，Sum=1+2+3=6，所以P(3)=6； 当N=4:i=1，Sum=0+1=1，i=2，Sum=1+2=3，i=3，Sum=1+2+3=6，i=4，Sum=1+2+3+4=10，所以P(4)=10。 那么s=P(1)+P(2)+P(3)+P(4)=20。 document.getElementById("warp").style.display="none"; document.getElementById("content").style.display="block"; 查看试题解析出处>>