下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2个，
完成下列程序。
Private Sub Backward(a())
Dim i As Integer,Tmp As Integer
Fori=1 To5
Tmp=a(i)

a(5-i)=Tmp
Nexti
End Sub

按照《药品流通监督管理办法(暂行)》的规定，药品经营企业和医疗机构在药品购销活动中，如发现假劣药品或质量可疑的药品，必须()

A．及时与药品生产经营企业联系

B．及时报告当地药品监督管理部门

C．及时做退、换货处理

D．及时报告当地药品检验机构

E．及时报告单位质量负责人