在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1 　　Private Sub Command1_Click() 　　Dim a(10) As Integer 　　For i=1 To 10 　　a(i)=i 　　Next 　　Call swap （） 　　For i=1 To 10 　　Print a(i); 　　Next 　　End Sub 　　Sub swap(b() As Integer) 　　n=Ubound(b) 　　For i=1 To n / 2 　　t=b(i) 　　b(i)=b(n) 　　b(n)=t 　（）　　Next 　　End Sub上述程序的功能是：通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……。请填空。

一个病人腹痛已5天，如果怀疑急性胰腺炎，最有诊断意义的指标是

A．血清淀粉酶
B．白细胞计数
C．血清脂肪酶
D．血清钙
E．血清正铁血红蛋白