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

17 查阅

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

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。

计算机考试