隧道竣工测量的内容包括：隧道断面净空测量，中线、高程测量及控制中线基桩和（）。 A．

下列程序段的执行结果是【 】。

x=Int (Rnd+4)

Select Case X

Case 5

Prunt "优秀"

Case 4

Print "良好"

Case 3

Print "合格"

Case Else

Print "不合格"

End Select

下列程序段的执行结果为______。 x=Int (Rnd+4) Select Case x Case 5 Print“优秀” Case 4 Print“良好” Case 3 Print“通过” Case Else Print“没有通过” End Select

A． 优秀

B．良好

C．通过

D．没有通过

A．A.优秀

B．B.良好

C．C.通过

D．D.不通过

下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case 4 Print"good" Case 3 Print "pass" Case Else Print "fail" End Select

A．excellent

B．good

C．pass

D．fall

下面程序段执行结果为

x=Int(Rnd()+4)

Select Case x

Case 5

Print"excellent"

Case4

Print"good"

Case 3

Print"pass"

Case Else

Print "fail"

End Select

A．excellent

B．good

C．pass

D．fall

运行下列程序: x = InputBox("input value of x" ) Select Case x Case Is ＞ 0 y=y+1 Case Is = 0 y=x+2 Case Else y=x+3 End Select Print x; y运行时，从键盘输入-5，输出的结果是()。

A．-7

B．-9

C．-8

D．-10

下面程序段执行结果为 x=Int(Rnd()+3) Select Case x Case 5 Print "excellent" Case 4 Print "good" Case 3 Print"pass" Case Else Print"fail" End Select

A．excellent

B．good

C．pass

D．fail

下面程序段执行结果为()。 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print"fail" End Select

A．excellent

B．good

C．pass

D．fail

下面程序段执行结果为 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print"fail" End Select

A．excellent

B．good

C．pass

D．fall