在窗体中有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click() Dim s As Integer s=P(1)+P(2)+P(3)+P(4) debug. Pnnt s

admin2021-07-08  28

问题 在窗体中有一个命令按钮Commandl,编写事件代码如下:
    Private Sub Commandl_Click()
    Dim s As Integer
    s=P(1)+P(2)+P(3)+P(4)
    debug. Pnnt 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

解析 题目中在命令按钮的单击事件中调用了过程P。而过程P的功能是根据参数N,计算从1到N的累加,然后返回这个值。N=l时,P(1)返回1,N=2时,P(2)返回3,N=3时,P(3)返回6,N=4时,P(4)返回10,所以s=l+3 +6 +10= 20。
转载请注明原文地址:https://jikaoti.com/ti/3m90FFFM
0

最新回复(0)