Al₂（SO₄）<s

运行以下程序后，输出结果为_____________。 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

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

在通用声明中定义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

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

血气分析结果符合代偿性代谢性酸中毒（ ）

在窗体中添加一个命令按钮，编写如下程序： 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

A、Sub plus(sum, a , b ): sum = a + b: End Sub

B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub

C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub

D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub

在窗体中添加一个名称为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

有如下SUB过程:

Sub s(x As Single,y As Single)

t=x

x=t / y

y=t Mod y

End Sub

在窗体上添加一个命令按钮,然后编写如下事件过程:

Private Sub Form_Click()

Dim a As Single

Dim b As Single

a=5

b=4

s a,b

Print a,b

End Sub

则程序运行后,单击命令按钮,输出的结果为【 】 。

有如下程序： Private Sub Command1_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1(a,b) End Sub Sub Sub1(x As Single，y As Single) t=X X=t\Y Y=t Mod y End Sub 在调用运行上述程序后，a和b的值分别为

A．0 0

B． 1 1

C．2 2

D．1 2

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：Public X As Integer Private Sub Commandl Click（ ）x＝10 Call slCall s2MsgBox x End Sub Private Sub sl（ ）x＝x+20 End Sub Private Sub s2（ ）Dim x As Integer x=x+20End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。

A.10

B.30

C.40

D.50