单项选择题

有如下函数过程: 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