单项选择题

阅读下列程序：
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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 6: y = 7 Do y = y - x Debug. Print y; x=x+1 Loop While x＜= 0 Print y; x End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．7 9
B．34 0
C．1 7
D．死笔循环
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Private Sub Command1_Click() Static a As Integer，b As Integer Cls b = b + 3 a = a + b Print a，b End Sub 程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为
A．8 16
B．6 6
C．15 18
D．18 9
相关试题