配料必须经两人以上复核无误的药品（）

A．药品 

B．药品的特殊性 

C．药品标准制定原则 

D．药品质量 

E．药品标准

以下程序的功能是单击Command1按钮，将输出1～100之间的所有同构数。同构数是指该数出现在它的平方数的右边，如5²=25、25²=625。
Private Sub Command1_Click()
Dim i As Integer,ip As Integer
For i=1 To 100
ip= 【9】
If i＜10 Then
If 【10】 Then
Print i，ip
End If
Else
If 【11】 Then
Print i，ip
End If
End If
Next i
End Sub