计算机二级
单击一次命令按钮之后，下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S： End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End FunctionA．20B．35C．115D．135
题目
单击一次命令按钮之后，下列程序代码的执行结果为 private Sub Command1_Click() S=P(1) +P(1)+P(2)+P(3)+P(4) Print S： End Sub Public Function P(N As Integer) Static Sum For I=1 To n Sum=Sum+I Next 1 P=Sum End Function
A．20
B．35
C．115
D．135
相似问题和答案
第1题：
单击一次命令按钮，下列程序代码的执行结果为( )。 Private Sub Commandl_Click() Dima As Integer,b As Integer，CASInteger a=2：b=3：c=4 PrintP2(c，b，A) End Sub PrivateFunctionPl(X As Integer,y As Intege；z As Integer) P1=2*x+y+3*Z End Function Priva
A．21
B．19
C．17
D．34
第2题：
单击一次命令按钮之后，下列程序代码的执行结果为______。 Private Sub Command1_ Click() a = fun(4) + fun(5) Print a; End Sub Public Function fun (n As Integer) Static Num For i = 1 To n Num = Num + i Next i fun = Num End Function
A．15
B．20
C．35
D．40
第3题：
单击命令按钮之后，下列程序代码的执行结果为______。 Private Function P(N As Integer) Static sum For I=I To N Sum = sum +1 Next I P =sum End Function Private Sub Command1_Click() S=P(1)+P(2)+P(3)+P(4) Print S： End Sub
A．20
B．30
C．115
D．135
第4题：
单击一次命令按钮后，下列程序的执行结果是 Private Sub Command1_Click() s=P(1) +P(2) +P(3) +P(4) Print s End Sub Public Function P(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i P=Sum End Function
A．15
B．25
C．35
D．45
解析：在被调用过程中，有这样的语句“StaticSum”，因为变量Sum是局部变量，局部变量除了可以用Dim语句声明外，还可用Static语句将变量声明为静态变量，它在程序运行过程中可保留变量的值，这就是说每次调用过程时，用Static说明的变量保持原来的值。具体过程分析如下：调用P(1)，所以在被调过程中N=1，执行ForNext循环，P(1)=Sum=1；调用P(2)，所以在被调过程中N=2，执行ForNext循环，P(2)=Sum=4；调用P(3)，所以在被调过程中N=3，执行ForNext循环，P(3)=Sum=10；调用P(4)，所以在被调过程中N=4，执行ForNext循环，P(4)=Sum=20；不难看出，最后输出的结果S值应为1+4+10+20=35，所以选项C正确。
第5题：
单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer a=2：b=3：C=4 Print P2(c，b，A)End Sub Private Function P1(x As Integer，y As Integer，z As Integer) P1=2 * X + y + 3 * z End Function Private Function P2(x As Integer，y As Integer，z As Integer) P2=P1(z，x，y) + X End Function
A．21
B．19
C．17
D．34
解析：对于多个过程或函数依次调用和处理与简单过程调用处理一样，本题先调用函数P2，而函数P2又调用函数P1，结果返回的顺序是从P1到P2，P2计算后输出到调用的地方。
第6题：
在窗体中有一个命令按钮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 Sum As 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
第7题：
单击一次命令按钮后，下列程序的执行结果是
Private Sub Command1_Click（）
s=P（1） + P（2） + P（3） + P（4）
Print s
End Sub
Public Function P（N As Integer）
Static Sum
For i=1 To N
Sum=Sum + i
Next i
P=Sum
End Function（ ）。
A．15
B．25
C．35
D．45
第8题：
单击一次命令按钮后，下列程序的执行结果是( )。 Private Sub Commandl_Click() s=P(1)+P(2)+P(3)+P(4) Print s End Sub Public FunctionP(N As Integer) Static Sum Fori=1To N Sum=Sum+i Nexti P=Sum End Function
A．15
B．25
C．35
D．45
第9题：
单击命令按钮时，下列程序的执行结果为
Private Sub Command1_Click（）
Dim a As Integer, b As Integer, c As Integer
a=2: b=3: c=4
Print P2（c, b, A．
End Sub
Private Function P1（x As Integer, y As Integer, z As Integer）
P1=2 * x + y + 3 * z
End Function
Private Function P2（x As Integer, y As Integer, z As Integer）
P2=P1（z, x, y） + x
End Function （ ）。
A．21
B．19
C．17
D．34