单选题 阅读下列程序: Function func(n As Integer)As Integer Sum = 0 For i = 1 To n Sum = Sum + (i + 1)* i Next i func = Sum End Function. Private Sub Command1_Click () Dim a As Integer a= 5 s = func (A) Print s End Sub 程序运行后,单击命令按钮,输出的结果为
【正确答案】 C
【答案解析】[分析] 本题调用一个Function过程func,该过程只有一个参数,类型为整型,返回值也为整型。过程的调用十分简单,关键是要搞清楚过程func的功能。从For-Next循环可以看出,该过程的功能是:1×2+2×3+3×4+…+(n+1)×n。在调用过程时,实参a的值为5,即上式中的n =5。因此返回的值为:1×2+2×3+3×4+4×5+5×6 =70。