求1!+2!+…+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=1 To 10

______

Next

Print y

End Sub

为实现功能要求，程序的横线处应该填入的内容是（）。

A．Call s(i)

B．Call s

C．y=y+s(i)

D．y=y+s

14～16世纪，欧洲向近代过渡，这一过渡的根本动力是（）

A.生产力发展与技术进步

B.新航路开辟和殖民扩张

C.资产阶级兴起

D.文艺复兴运动的影响