设在主函数中有以下定义和函数调用语句，且fun函数为void类型；请写出fun函数的

口服用于上消化道出血（）

A．去氧肾上腺素

B．多巴胺

C．麻黄碱

D．去甲肾上腺素

E．肾上腺素

26岁男患，既往乙型肝炎病史，近5天出现发热，食欲不振，恶心、呕吐，尿黄加深1天，丙氨酶氨基转移酶(ALT)676U/L,HBsAg(+),HBeAg(+)，抗-HBs(+)，抗-HEVIgM(+)，抗-HEVIgG(+)，此为（）

A.重叠感染

B.混合感染

C.潜在性感染

D.继发感染

E.重复感染

小儿动脉收缩压可用下列哪项公式推算（）

A.（年龄×2）+75mmHg

B.（年龄×2）+80mmHg

C.（年龄×2）+85mmHg

D.（年龄×2）+48mmHg

E.（年龄×2）+90mmHg

普通电抗器的额定电流选择应( )。

A．按回路最大工作电流选择

B．按回路最大工作电流1.1倍选择

C．按回路最小工作电流选择

D．按回路最小工作电流1.1倍选择

有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以4余1，除以5余2则输出，否则，将焦点定位在文本框中，并清除文本框的内容。　　Private　Sub　Command1_Click(　)　　　x=Val(Text1．Text)　　　If【 】　Then　　　　　Print x　　　Else　　　　　Text1．Text=""　　　　　【 】　　　　End If　　End Sub