第6题: [填空题]在窗体中添加一个名称为Com1的命令按钮，然后编写如下程序： Private Sub s(ByVal p As Integer) p=p*2 End Sub Private Sub Com1_Click（ ） Dim i As Integer i=3 Call s(i) If i＞4 Then i=i^2 MsgBox i End sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。 参考答案:C 答案解析:[解析] 本题考查VBA程序的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用，此时形参的变化不会返回到实参；若用ByRe
第32题: [单项选择]女性，23岁。2天来解柏油样大便5次，今晨突然昏倒来急诊。以往无胃病与肝病史，近期无服药史。体检：面色苍白，血压9.3/6.7kPa（70/50mmHg），脉搏130次/min，首选哪项措施（）。 A. 胃镜检查 B. 静脉注射止血药 C. 冰盐水洗胃 D. 口服去甲肾上腺素 E. 补充血容量 参考答案:E 答案解析:患者血压70/50mmHg，提示失血性休克，应先补充血容量，待病情平稳后行急诊胃镜检查。
