有如下函数过程: Function lj(x As Integer) As Lon
题型：单项选择题
问题：
有如下函数过程: Function lj(x As Integer) As Long Dim s As Long Dim i As Integer s=0 For i = 1 To xs=s+ i Next i1j= s End Function在窗体上添加一个命令按钮，名为Command1, 编写事件过程调用该函数： Private Sub Command1 Click()Dim i As IntegerDim sum As LongFor i = 1 To 5 sum = sum + 1j(i)Next iPrint sum End Sub
A．25
B．35
C．45
D．55
