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

admin2015-07-01  27

问题 在窗体中有一个命令按钮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 + i
   Next i
   P = Sum
End Function
打开窗体运行后,单击命令按钮,输出结果是(  )。

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

答案B

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

最新回复(0)