设有如下程序：
Private Sub Form_Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+1
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后，单击窗体，则在窗体上显示的是( )。

A．15

B．16

C．20

D．25

根据海关有关管理规定，下列哪些单位可以申请向海关办理报关注册登记：

A．专门从事报关服务的企业
B．经营国际货物运输代理、国际运输工具代理等业务，并接受委托代办进出口货物报关的企业
C．有进出口经营权的企业
D．经常接受境外捐赠的儿童福利机构