产妇G1P0，停经41+5周，无腹痛及阴道流液。产科检查：宫高35cm，腹围102cm，胎位LOA，宫颈Bishop评分3～4分，骨盆内测量无异常，B超示AFV5．0，双顶径9.3cm。胎盘成熟度3级，胎动正常，以下处理错误的是（）
第1题：
下面程序： Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。
A．0
B．12
C．Str(z)
D．显示错误信息
第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题：
在通用声明中定义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
第4题：
有如下程序： 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
第5题：
下面程序的执行结果是______。 #define MAX 10 nt a[MAX],i； main() { printf("\n")； sub1()；sub3(A) ； sub2()；sub3(A) ； } sub1() {for(i=0;i＜1MAX;i++) a[i]-i+i； } sub2() {int a[MAX],i,max； max=5； for(i=0;i＜max;i++) a[i]=i； } sub3(int a[]) { int i； for(i=0;i＜MAX;i++) printf("%d",a[i])； printf("\n")； }
A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4
B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18
C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4
D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18
第6题：
运行以下程序后，输出结果为_____________。 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
第7题：
以下程序的运行结果是( ) #define MAX 10 int a[MAX]，i; main() { printf("\n");sub1()；sub3(A) ,sub2()，sub3(A) ； } sub2() { int a[MAX]，i，max； max=5； for(i=0；i＜max；i++)a[i]＝i； } sub1() {for(i=0;i＜MAX；i++)a[i]＝i+i; } sub3(int a[]) { int i; for(i=0;i＜MAX，i++)printf("%d"，a[i])； printf("\n")； }
A．0 2 4 6 8 10 12 14 16 18 0 1 2 3 4
B．0 1 2 3 4 0 2 4 6 8 10 12 14 16 18
C．0 1 2 3 4 5 6 7 8 9 0 1 2 3 4
D．0 2 4 6 8 10 12 14 16 18 0 2 4 6 8 10 12 14 16 18
第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运行上面的程序，单击命令按钮，输出结果为。
第9题：
在窗体中添加一个命令按钮，编写如下程序： 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
第10题：
有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a,B)End Sub Sub Subl(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
D．1 2