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

admin2019-02-19  31

问题 在窗体中有一个命令按钮Commandl,编写事件代码如下:
  Pfive Sub Commandl_Click()
    Dim S As Integer
    S=P(1)+P(2)+P(3)+P(4)
    debug.Prim S
    End Sub
    Public Function PfN AS Integer)
    Dim Sum As Integer
    Sum=0
    For i=l T0 N
    Sum=Sum+i
    Next i
    P=Sum
    End Function
    打开窗体运行后,单击命令按钮,输出结果是

选项 A、15
B、20
C、25
D、35

答案B

解析 从函数P的代码可知,其功能是计算从1到N的和,在命令按钮的单击事件代码中,可知S为P(1),P(2),P(3),P(4.)的和,显然P(1)=1,P(2)=1+2=3,P(3)=l+2+3=6,P(4)=l+2+3+4=10,所以S=1+3+6+10=20。
转载请注明原文地址:https://kaotiyun.com/show/O90p777K
0

最新回复(0)