单选题 在窗体上添加一个命令按钮,名为Command1,并编写事件过程和函数过程,则输出结果为______。
Function f1(x As Integer)As Long
Dim s As Long,i As Integer
s=0
For i=1 To x
s=s+i
Next i
f1=s
End Function
Private Sub Command1_Click()
Dim i As Integer,sum As Long
For i=1 To 5
sum=sum+f1(i)
Next i
Print sum
End Sub
  • A.25
  • B.35
  • C.45
  • D.55
【正确答案】 B
【答案解析】[考点] 函数调用 [解析] 本题函数过程f1的作用是计算1~x(x为过程参数)间所有整数之和。在命令按钮的单击事件过程中,通过For循环先后5次调用n函数过程。其中,f1(1)=1,f1(2)=3,f1(3)=6,f1(4)=10,f1(5)=15。故Sum=1+3+6+10+15=35。