[单项选择题] 有如下函数过程: Function lj(x As Integer) As Long Dim s As Long Dim i As Int
2021-07-20
[单项选择题] 有如下函数过程:
Function lj(x As Integer) As Long
Dim s As Long
Dim i As Integer
s=0
For i = 1 To x
s=s+ i
Next i
1j= s
End Function
在窗体上添加一个命令按钮，名为Command1, 编写事件过程调用该函数：
Private Sub Command1 Click()
Dim i As Integer
Dim sum As Long
For i = 1 To 5
sum = sum + 1j(i)
Next i
Print sum
End Sub
A．25
B．35
C．45
D．55
正确答案：B
词条内容仅供参考，如果您需要解决具体问题
（尤其在法律、医学等领域），建议您咨询相关领域专业人士。