单击一次命令按钮后，下列程序的执行结果是Private Sub Command1_Click（）s=P（1） + P（2） + P（3） + P（4）Print sEnd SubPublic Function P（N As Integer）Static SumFor i=1 To NSum=Sum + iNext iP=SumEnd Function（ ）。A．15B．25C．35D．45

题目

单击一次命令按钮后，下列程序的执行结果是

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

相似考题

1.（ 10 ）在窗体上有一个命令按钮 Commandl ，编写事件代码如下：Private Sub Command1_Click()Dim a(10), p(3) As Integerk = 5For i = 1 To 10a(i) = i * iNext iFor i = 1 To 3p(i) = a(i * i)Next iFor i = 1 To 3k = k + p(i) *2Next iMsgBox kEnd Sub打开窗体运行后，单击命令按钮，消息框中输出的结果是 【 10 】 。

2.单击一次命令按钮后，下列程序的执行结果是( )。 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 FunctionA．15B．25C．35D．45

3.在窗体中有一个命令按钮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．15B．20C．25D．35

4.单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click（）Dim a As Integer, b As Integer, c As Integera=2: b=3: c=4Print P2（c, b, A．End SubPrivate Function P1（x As Integer, y As Integer, z As Integer）P1=2 * x + y + 3 * zEnd FunctionPrivate Function P2（x As Integer, y As Integer, z As Integer）P2=P1（z, x, y） + xEnd Function （ ）。A．21B．19C．17D．34

更多“单击一次命令按钮后,下列程序的执行结果是 PrivateSubCommand1_Click() s=P(1)＋P(2)＋P( ”相关问题

  • 第1题：

    单击命令按钮时，下列程序的执行结果为 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


    正确答案：A
    解析：对于多个过程或函数依次调用和处理与简单过程调用处理一样，本题先调用函数P2，而函数P2又调用函数P1，结果返回的顺序是从P1到P2，P2计算后输出到调用的地方。

  • 第2题：

    单击命令按钮之后，下列程序代码的执行结果为______。 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


    正确答案：B

  • 第3题：

    在窗体中有一个命令按钮Commandl，编写事件代码如下：

    Private Sub Command1_CliCk()

    Dim s As Integer

    s=P(1)+P(2)+e(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 Function

    打开窗体运行后，单击命令按钮，输出结果是

    A．15

    B．20

    C．25

    D．35


    正确答案：B
    解析：考察循环结构。当N=1时，p(1)=1；当N=2时，p(2)=3；当N=3时，p(3)=6；当N=4时，p(4)：10；所以s：20。

  • 第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


    正确答案：C
    解析：在被调用过程中，有这样的语句“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() 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


    正确答案：B
    解析：本题综合考查Function函数的建立、调用以及For循环控制语句。本题调用了4次P函数过程，参数赋值分别为1、2、3、4，对应的Sum值分别为1\4、10、20，之和为35，故答案为B。

相关内容