患者男，30岁，4 d前突然高热，体温39 ℃ ，结膜充血，皮肤散在充血性斑丘疹，变形杆菌 OX19凝集试验（＋），初步诊断为地方性斑疹伤寒。首选药物是（）

A.青霉素

B.氯霉素

C.磺胺类抗生素

D.四环素

E.喹诺酮类抗生素

如下事件过程：　　Function Feed(x)　　　　If x ＜10 Then　　　　　　Feed=X　　　　Else　　　　　　Feed=10+x　　End If　　End Function　　Private Sub Command1_Click( )　　　　x=Val(Input Box(" "，0))　　　　pay=Feed(x)　　　　Print pay　　End Sub　　运行时在输入框内输入变量x的值为15，输出结果为

A．0

B．15

C．25

D．30