问题
单项选择题
阅读下列程序：
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
程序运行后，单击命令按钮，输出的结果为A) 80
B．60
C．70
D．15
答案
参考答案：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。