妇产科护理(医学高级)
患者25岁，子痫，G1P1，产后2天，外阴水肿仍未消退治疗时使用的溶液是（）。A、50%硫酸镁B、75%乙醇C、1%乳酸液D、1：5000高锰酸钾E、4%碳酸氢钠
题目
患者25岁，子痫，G1P1，产后2天，外阴水肿仍未消退治疗时使用的溶液是（）。
- A、50%硫酸镁
- B、75%乙醇
- C、1%乳酸液
- D、1：5000高锰酸钾
- E、4%碳酸氢钠
相似问题和答案
第1题：
运行以下程序后，输出结果为_____________。 Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub:";p;m;n End Function
：A. sub:2 6 4 main:1 2 3
B. sub:2 6 4 main:2 2 3
C. sub:2 6 4 main:2 6 4
D. sub:2 6 4 main:1 6 4
第2题：
窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（ ）。
A.Private Sub Form1 Click（ ）
End Sub···
B.Private Sub Form1. Click（ ）
End Sub···
C.Private Sub Command1 click（ ）
End Sub···
D.Private Sub Command Click（ ）
End Sub···
B。【解析】窗体单击事件为Form—Click事件。
第3题：
（ 25 ）要求当鼠标在图片框 P1 中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是
A ）
Private Sub P1_MouseMove （ Button AS Integer,Shift As Integer,X As Single,
Y As Single ）
Print X,Y
End Sub
B ）
Private Sub P1_MouseDown （ Button AS Integer,Shift As Integer,X As Single,
Y As Single ）
Picture.Print X,Y
End Sub
C ）
Private Sub P1_MouseMove （ Button AS Integer,Shift As Integer,X As Single,
Y As Single ）
P1.Print X,Y
E n d S u b
D ）
Private Sub Form_MouseMove （ Button AS Integer,Shift As Integer,X As Single,
Y As Single ）
P1.Print X,Y
End Sub
第4题：
在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后，输出结果为
A．Sub：2 6 4 Main：2 6 4
B．Sub：2 6 4 Main：2 6 4
C．Sub：2 6 4 Main：1 2 3
D．Sub：2 6 4 Main：2 2 3
解析：考查考生对参数传递的掌握情况。
[解题要点] 这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送，b1+3和c1为表达式按值传送。
[错解分析] 参数的传值方式和传址方式的区别。
[考点链接] 函数调用和参数传递。
第5题：
在窗体中添加一个名称为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
End sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
3 解析： 本题考查VBA程序的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用，此时形参的变化不会返回到实参；若用ByRef声明，说明此参数为传址调用，此时形参的变化将会返回到实参：没有说明传递类型，则默认为传址传递。此题中形参p被说明为ByVal传值形式的整型量，当运行Com1_Click()过程时调用s()函数，实参i传送其值给形参p，p发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递，所以实参i的值不发生变化，if语句中的判断条件为假，所以会直接执行MsgBox i语句后输出3。
第6题：
A、Sub S1(ByVal n!())
B、Sub S1(n!) as Integer
C、 Function S1%(S1%)
D、 Function S1(ByVal n!)
第7题：
下列程序的执行结果是______。
PrivateFunctionP(NASInteger)
Fori=1 To N
SUM=SUM+i
Nexti
P=SUM
End Function
Privte Sub Commandl_Click()
S=P(1)+P(2)+P(3)+P(4)
Print S
End Sub
20
第8题：
阅读程序： Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序，单击命令按钮，输出结果为。
【解析】本题综合考查Sub过程的建立与调用以及数组的赋值。P过程为参数b()赋值，赋值方法为b()中的元素值等于其下标的2倍。在事件过程中，数组a(1 to 4)先被逐一赋值，然后以传地址的方式被p过程调用。在调用中，a(i)被重新按照p过程的赋值方式（即元素值等于对应下标值的2倍）赋值。由于是以传地址的方式传送a(1 to 4)，故在调用完p过程后，a(1 to 4)，故在调用完p过程后，a(1 to 4)中的元素值将保留，故空白处填：2 4 6 8。
第9题：
在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x＋20 End Sub Private Sub s2() Dim x As Integer x=X＋20 End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果为______。
A．10
B．30
C．40
D．50
解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。
第10题：
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下： Public X As Integer Public Y As Integer Sub S1（ ） x=1 S2 End Sub Sub S2（ ） y=10 Form1．Show End Sub Model2的代码如下： Sub Main（ ） S1 End Sub 其中Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是（ ）。
A.Form1→Model1→Model2
B.Model1→Model2→Form1
C.Model2→Model1→Form1
D.Model2→Form1→Model1
C。【解析】本题考查VisualBasic程序执行过程中各模块和窗体的调用过程。按照本题中代码执行，首先程序调用执行Model2，Model2中调用s1，s1数组属于Model1模块，Model1会调用s2，s2致使Form1执行，可以得出正确答案为选项C。