求11+2 1+…+10!的程序如下： Private Function s(x As Integer) f=1 For i=1 To x f=f*i Next s=f End Function

admin2020-07-22 29

问题求11+2 1+…+10!的程序如下：
Private Function s(x As Integer)
f=1
For i=1 To x
f=f*i
Next
s=f
End Function
Private Sub Command1_Click()
Dim i As Integer
Dim y As Long
For i=1To 10
Next
Print Y
End Sub
为实现功能要求，程序的横线处应该填入的内容是( )。

选项 A、Call s(i)
B、Call s
C、y=y+s(i)
D、y=y+s

答案C

解析题目中过程s的功能是实现一个数的阶乘，而题目是求1到10的阶乘的和，则程序空缺处应该是过程s返回值的累加，因此就应该为y=y+s(i)。

转载请注明原文地址:https://kaotiyun.com/show/3tHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类