问题 单项选择题

有如下函数过程:
Function lj(x As Integer)As Long
Dims As Long
Dimi As Integer
s=0
Fori=1 To x
s=s+i
Nexti
lj=s
End Funcfion
在窗体上添加一个命令按钮,名为Commandl,编写事件过程调用该函数,输出结果为 ( )。
Private Sub Commandl_lick()
Dimi As Integer
Dim sum As Long
Fori=1 To 5
sum=sum+lj(i)
Nexti
Print sum
End Sub

A.25

B.35

C.45

D.55

答案

参考答案:B

填空题
综合