承包单位填写《施工组织设计（方案)报审表》报送项目监理机构后，在约定的时间内由（）审核签

单击命令按钮时，下列程序的执行结果是

Private Sub Command1_Click()

BT 4

End Sub

Private Sub BT(x As Integer)

x=x*2+1

If x＜6 Then

Call BT(x)

End If

x=x*2

Print x；

End Sub

A．15

B．16

C．17

D．18

窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是

Private Sub Command1_Click()

Dim a

a=Array(1,2,3,4,5)

For k=1 To 4

s=s+a(k)

Next

Print S

End Sub

A．10

B．14

C．15

D．120

单击命令按钮执行下列程序，其输出结果是()。

Private Sub Command1_Click()

Dim a As Integer,b As Integer,c As Integer

a=3

b=4

c=5

Prim SecProc(c,b,A)

End Sub

Function FirProc(x As Integer,y As Integer,z As Integer)

FirProc=2*x+y+3*z

End Function

Function SecProc(x As Integer,y As Integer,z As Integer)

SecProc=FirProc(z,x,y)+x

End Function

A．20

B．22

C．28

D．30

单击命令按钮执行下列程序，其输出结果是()。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3 b=4 c=5 Print SecProc(c, b,a)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Function

A．20

B．22

C．28

D．30

窗体上有一个命令按钮，命令按钮的单击事件过程如下。运行程序后，单击命令按钮，输出结果是 Private Sub Command1_Click() Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End Sub

A．10

B．14

C．15

D．120

单击命令按钮时，下列程序的执行结果是

Private Sub Command1_Click（）

BT 4

End Sub

Private Sub BT（x As Integer）

x=x * 2 + 1

If x < 6 Then

Call BT（x）

End If

x=x * 2

Print x;

End Sub（）。

A．15

B．16

C．17

D．18

单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT4 End Sub Private Sub BT(x As Integer) x=x * 2 + 1 If x＜6 Then Call BT(x) End If x=X * 2 Print x； End Sub

A．15

B．16

C．17

D．18

单击命令按钮时，下列程序的执行结果是 Private Sub Commandl_Click() BT 4 End Sub PriVate Sub BT(x As Integer) X=X * 2 + 1 If x ＜6 Then Call BT(x) End If X=x * 2 Print x； End Sub

A．15

B．16

C．17

D．18

单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() BT 4 End Sub Private Sub BT(x As Integer) x=x*2+1 If x＜6 Then Call BT(x) End If x=x*2 Print x； End Sub

A．15

B．16

C．17

D．18