单项选择题

阅读下列程序: 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