呼吸功能:FEV1<60%,最大通气量低于预计值的80%,对慢性阻塞性肺疾病的诊断有重要意义。
第1题:
在通用声明中定义a,在窗体中添加一个命令按钮Command1,编写如下程序代码:
DimaAsInteger
Subtest()
a=a+1:b=b+1:c=c+1
Print"Sub:";a;",";b;",";c
EndSub
PrivateSubCommand1_Click()
a=2:b=3:c=4
Calltest
Calltest
EndSub
程序运行后,单击命令按钮,窗体中将显示( )
A.Sub:3,4,5Sub:4,5,6
B.Sub:2,3,4Sub:2,3,4
C.Sub:3,1,1Sub:4,1,1
D.Sub:1,1,1Sub:1,1,1
第2题:
A、Pa0/sub2/supsubno<60mHl.PaCO/sub2/supsubno>50mmlg
B、Pa0/sub2/supsubno<60mHgPaCO/sub2/supsubno<45mmg
C、Pa0/sub2/supsubno<60mmHgPaCO/sub2/supsubno>50mmH
D、Pa0/sub2/supsubno<60mHg、PaCO/sub2/supsubno<45mmHg
E、Pa0/sub2/supsubno<60mHg、PaC0/sub2supsubno45mmHg
第3题:
有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
第4题:
在窗体中添加一个命令按钮,编写如下程序:
Private Sub Sub1(p,m,n)
p=p+1:m=m+1:n=n+1
Print "sub1:";p;m;n
End Sub
Private Sub Command1_Click()
a1=1:b=2:c1=3
Call Sub1(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
第5题:
下列检查结果哪项最符合该患者目前的病情变化( )
A.PaCO<SUB>2</SUB>降低
B.PaO<SUB>2</SUB>降低;PaCO<SUB>2</SUB>升高
C.PaO<SUB>2</SUB>降低;PaCO<SUB>2</SUB>降低
D.肺活量正常,残气量增加
E.FEVI减低,残气量正常
第6题:
(30)下列事件过程可以将打开文件对话框的标题改变为“new Caption”.A.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowFont End Sub B.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowOpen End Sub C.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowHelp End Sub D.Private Sub Commandl_Click() CommonDialog1.DialogTitle="new Caption" CommonDialog1.ShowColor End Sub
第7题:
窗体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···
第8题:
诊断阻塞性肺气肿,最有价值的是( )
A.PaO<SUB>2</SUB>低于正常
B.残气量/肺总量>40%
C.第一秒用力呼气量/用力肺活量<60%
D.最大通气量低于预计值的80%
E.潮气量低于预计值的80%
第9题:
当发生Form_Click事件时,下列程序的输出结果是( )。 Private m As Integer,n As Integer Private Sub Form_Click() Dim k As Integer,p As Integer k=6:p=60 Call sub1(k,p) Print m,n,m,k,p Call sub1(k,p) Print m,n,k,p End Sub Private Sub Form_Load() m=7 n=70 End Sub Public Sub sub1(x As Integer,ByVal y As Integer) Dim m As Integer n=n+5 m=n+x+y x=x+y y=x+y End Sub
A.7 75 66 60 7 80 126 60
B.7 75 66 60 7 75 126 60
C.7 75 66 60 7 80 66 60
D.7 75 66 60 7 75 66 60
第10题:
在窗体中添加一个命令按钮,编写如下程序: Private Sub Sub1(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub1:";p;m;n End Sub Private Sub Command1_Click() a1=1:b=2:c1=3 Call Sub1(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