单选题有如下函数过程： Function fl(x As Integer)As Long Dim s As Long，i As Integer s=0 For i=1 To x s=s+i Nexti f1=s End Function 在窗体上添加一个命令按钮，名为Command1，并编写事件过程调用该函数，则输出结果为( )。 Private Sub Command1_Click() Dim i As Integer，sum As Long For i=1 To 5 sum=sum+n(i) Next i Print sum End Sub

A、 25
B、 35
C、 45
D、 55

【正确答案】 B

【答案解析】解析：本题考查函数过程的功能分析。函数f1的主要功能是计算1到x的累加和，也就是计算1+2+…+x。在命令按钮的单击事件中循环程序调用了5次n函数，sum计算为：1+1+2+1+2+3+1+2+3+4+1+2+3+4+5，因此结果为35。