哪种药物是急性风湿热的首选药物A．尼美舒利 B．乙酰水杨酸 C．保泰松 D．甲芬那酸

救护吞服不明毒物中毒者，可予下列哪种泻药（）。

A.蓖麻油

B.石蜡油

C.甘露醇

D.肝油

E.硫酸钠

具有耐腐蚀性的换热器是（）。

A．板片式换热器

B．非金属换热器

C．列管式换热器

D．夹套式换热器

急性白血病出血的主要原因是（）

A.DIC

B.血小板减少

C.纤维蛋白溶解

D.AT-Ⅲ减少

E.小血管被白血病细胞浸润破坏

女性，25岁，2周来发热，四肢关节酸痛，无皮疹，胸透示两侧少量胸腔积液，体检：体温39℃，心率120次／分，两下肺叩诊浊音，呼吸音降低，肝脾未触及，两手掌指关节及膝关节轻度肿胀。血常规：血红蛋白100g/L，白细胞3×10／L，血小板5×10/L；尿常规：蛋白1g/L，最可能的诊断是（）

A.类风湿关节炎

B.系统性红斑狼疮

C.结核性胸膜炎

D.病毒感染

E.再生障碍性贫血

阅读下面程序。
Private Function a(load As Integer) As Single
If load ＜ 20 then
money = load / 2
else
money = 20 + load
end if
a = money
End Function
Private Sub Form_Click()
Dim load As Integer, fee AS Single
Load = InputBox ("请输入一个数: ")
Fee = a(load)
Print fee
End Sub
输入20，运行后的输出结果是 【13】 。