[单项选择题] 阅读下列程序： Function func(n As Integer)As IntegerSum = 0For i = 1 To n Sum

[单项选择题] 阅读下列程序：

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

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。