有如下函数过程： Function lj(x As Integer)As LongDims As LongDimi As Integers=0 Fori=1 To xs=s+i Nextilj=s End Funcfion 在窗体上添加一个命令按钮，名为Commandl，编写事件过程调用该函数，输出结果为 ( )。 Private Sub Commandl_lick()Dimi As IntegerDim sum As LongFori=1 To 5 sum=sum+lj(i)NextiPrint sum End Sub

A．25

B．35

C．45

D．55