问题
单项选择题
有如下函数过程:
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