问题
多项选择题
地下洞室穿越下列（）条件时，应判为不良洞段。（）
A.与大的地质构选断裂带交叉的洞段
B.具有岩爆、有害气体、岩溶、地表水强补给区的洞段
C.由中等强度岩体组成的微透水洞段
D.通过土层，塑性流变岩及高膨胀性岩层的洞段
答案
参考答案：A, B, D
解析：中等强度岩体组成的微透水洞段可以不必判定为不良洞段，其他均为不良洞段。
搜题请搜索小程序“爱下问搜题”
地下洞室穿越下列（）条件时，应判为不良洞段。（）
A.与大的地质构选断裂带交叉的洞段
B.具有岩爆、有害气体、岩溶、地表水强补给区的洞段
C.由中等强度岩体组成的微透水洞段
D.通过土层，塑性流变岩及高膨胀性岩层的洞段
参考答案：A, B, D
解析：中等强度岩体组成的微透水洞段可以不必判定为不良洞段，其他均为不良洞段。
在开发过程中，文本框名为Text1，界面上有上至下三个按钮分别取名为CmdMark、CmdReresh和CmdExit。[Visual Basic代码]Private Sub CmdMark_Click() ’按钮“输入评分”的单击事件响应代码 Dim i As Integer,temp As Variant’声明变量 Dim marks(1 To 10),maxMark,minMark,sumMark,mark As Single sumMark=0 Text1.Text=“编号”&Chr(9)&“评分”& vbCrLf For i=1 To 10’接收十个评分输入Do While 1=1 ’验证并接收第i个评委的评分temp=InputBox(“请输入”&i&“号评委的评分:”)If (1) IsNumeric(temp)Then Msg Box“数据类型错误，请重试!”ElseIf CSng(temp)＜0 Or CSng(temp)＞100 Then MsgBox“数值范围错误，请重试!”Else:Exit DoEnd If Loop marks(i)=CSng(temp) If i=1 Then maxMark= (2) :minMark= (2) If marks(i)＞maxMark Then maxMark=marks(i) If minMark＞marks(i)Then (3) sumMark=sumMark+marks(i)Text1.Text=Text1.Text & i & Chr(9) & marks(i) & vbCrLf输出第i个评委的评分 Next mark=( (4) )/8’计算选手最后得分 Text1.Text=Text1.Text &"去掉一个最高分:"&maxMark&vbCrLf&_ "去掉一个最低分:"&minMark&vbCrLf&_ "选手最后得分:"&markEnd SubPrivate Sub Command2_Click() ’按钮“刷新屏幕”的单击事件响应代码 (5) .Text=“单击”输入评分“按钮，开始统分……”End SubPrivate Sub Command3_Click() 按钮“退出程序”的单击事件响应代码 EndEnd Sub