第16题: [填空题]在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下程序：
Private Sub s(ByVal p As Integer)
p = p * 2
End Sub
Private Sub Command1_Click（ ） Dim i As Integer
i = 3
Call s(i)
If i > 4 Then i = i ^ 2
MsgBox i
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________ 。
参考答案:C 答案解析:由于VBA中，传值调用（ByVal选项）为“单向”作用形式即过程调用只是相应位置实参的值“单 向”传送给形参处理，而被调用过程内部对形参的任何操作引起的形参值的变化均不会反馈、影响实参的 值。此题中：
第22题: [单项选择]下列有关细菌产生耐药性的机制，描述不正确的是（）。 A. 抗菌药物作用靶位改变 B. 产生灭活酶或钝化酶，使药物在作用于菌体前即被破坏或失效 C. 改变细菌细胞外膜通透性 D. 影响被动流出系统 E. 细菌生物被膜耐药屏障 参考答案:D 答案解析:细菌产生耐药性的机制有：①抗菌药物作用靶位改变；②产生灭活酶或钝化酶；③改变细菌细胞外膜通透性；④影响主动流出系统；⑤细菌生物被膜耐药屏障。
