下面程序段的运行结果是 【15】 。
Option Base 1
Private Sub swap (a() As Integer)
For I=1 to 10/2
t=a (I)
a (I) =a (10-I+l)
a (10-I+1)=t
Next I
End Sub
Private Sub Form Click()
Dim x(10) As Integer
For I=1 to 10
x(I) =1*2
Next I
Swap x ()
For I=1 to 10
Print x (I)
Next I
End Sub

当动物缺乏某激素时，可以通过“饲喂法”或“注射法”对激素进行人工补充，下列必须通过“注射法”补充的是（）①生长激素②甲状腺激素③胰岛素④性激素

A.①③

B.③④

C.②④

D.②③