设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=i
Next
For Each arrItem 【13】 a
If arrItem Mod 7=0 Then Print arrItem：
If arrItem＞90 Then Exit For
Next
End Sub
请填空。

下列说法不正确的是( )。

A．制定和调整政府定价和政府指导价的药品价格，应当组织药学、医学、经济学等方面专家进行评审和论证

B．列入医保《药品目录》以外具有垄断性生产、经营的药品，实行政府定价或政府指导价

C．列入医保《药品目录》的药品实行市场调节价

D．在国家规定的时间内未通过GMP认证，仍生产药品的药品生产企业应当受到处罚

E．未经批准，医疗机构擅自使用其他医疗机构配制的制剂，应给予处罚