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

admin2010-04-08  56

问题 在窗体中有一个命令按钮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。
转载请注明原文地址:https://kaotiyun.com/show/KOwp777K
0

最新回复(0)