下面程序的功能是单击窗体时在消息框中输出1000以内能同时被3、5和7整除的整数。请在空白处填入适当语句将程序补充完整。
Private Sub Form_Click()
sum=0
For i=1 To 1000
If Then
sum=sum+i
End If
Next i
MsgBox sum
End Sub

关于药学服务的基本要素，叙述正确的是（）

A.对药物本身的服务

B.提供药物信息和知识

C.不是仅限于行为上的“服务”

D.“与药物使用有关”的“服务”

E.以提供信息和知识的形式为公众服务