男性，62岁，发现高血压12年，近4年出现胸骨后疼痛，诊断为原发性高血压、冠心病（心绞痛型），给予硝苯地平和β受体阻断药口服。1天前突然出现气急、咳嗽，咳泡沫样痰。检查：端坐呼吸，BP150／90mmHg．心率130次／分，房颤心律，双肺底湿性啰音，下肢无水肿。

此病人出现病情加重最可能的诱因是（）

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