某生产装置SO2排气筒高度100m，执行《大气污染物综合排放标准》的新污染源标准，标准规定排气筒中SO2最高允许排放浓度960mg/m3，100m烟囱对应的最高允许排放速率为170kg/h。距该排气筒半径200m范围内有一建筑物高96m，则排气筒中SO2排放应执行的标准是（）。
第1题：
有如下过程：
Sub SS(ByVal X，ByRef Y，Z)
X=X + 1
Y=Y + 1
Z=Z + 1
End Sub
执行该过程的事件过程如下：
Private Sub Command1_Click()
A = 1
B = 2
C = 3
Call SS(A，B，C) Print A；B；C
End Sub
则该程序的执行结果是【 】。
第2题：
执行下面程序，第一行输出结果是【 】，第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A) End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub
第3题：
窗体上有两个按钮，则执行程序后按键盘Cance1键的输出结果是 【7】 。
Private Sub Command1_Click（）
Print "北京";
End Sub
Private Sub Command2_Click（）
Print "南京";
End Sub
Private Sub Form_Load（）
Command2.Cancel=True
Command1.Cancel=True
End Sub
第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题：
PaO<SUB>2</SUB>↓，PaCO<SUB>2</SUB>↑提示（ ）
第6题：
A、PH7.38，PaO<SUB>2</SUB>50mmHg，PaCO<SUB>2</SUB>40mmHg
B、PH7.30，PaO<SUB>2</SUB>50mmHg，PaCO<SUB>2</SUB>80mmHg
C、PH7.40，PaO<SUB>2</SUB>60mmHg，PaCO<SUB>2</SUB>65mmHg
D、PH7.35，PaO<SUB>2</SUB>80mmHg，PaCO<SUB>2</SUB>20mmHg
E、PH7.25，PaO<SUB>2</SUB>70mmHg，PaCO<SUB>2</SUB>20mmHg
血气分析结果符合代偿性代谢性酸中毒（ ）
第7题：
在下面的程序中，要求循环体执行四次，请填空。
Private Sub Command1 _ Click()
x=l
Do While【 】
x=x+2
Loop
End Sub
第8题：
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
第9题：
有如下自定义过程： Sub test(x As Integer) x =X *2+1 If x＜6 Then Call test(x) End If x=x* 2 + 1 Print x； End Sub调用该过程的事件过程如下：Private Sub Command1_Click() test 2End Sub则该段程序的执行结果是______ 。
A．12
B．23 47
C．23
D．5 10
第10题：
在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click() Print "Visual"； End Sub Private Sub Command2_Click() Print "Basic"； End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是
A．Basic
B．Visual
C．Cancel
D．True