【单选题】

有如下函数过程：

Function 1j(xAs Integer)As Long
Dim SAs Long
Dim iAs Integer
s=0
For i=1 To X
s=s+i
Next i
1j=s
End Fundion
在窗体上添加一个命令按钮，名为Command1，编写事件过程调用该函数，输出结果为()。
Private SubCommand1_Click()
Dim iAs Integer
For i=1 To 5
sum=sum+1j(i)
Next i
Print sum
End Sub
A、25 B、35 C、45 D、55