隧道施工的主要技术中，有一种称为六部开挖法，这种方法还可以称为( )。

A．漏斗棚架法

B．反台阶法

C．正台阶法

D．盾构法

在窗体上画一个命令按钮Command1，然后编写如下程序： Private Sub Command1_click() Dim arr() As Integer ReDim arr(3) For i=0 To 3 arr(i)=i Next i x=InputBox("请输入一个数字：") If Val(x)＞4 Then ReDim arr(4) an(4)=x End IfMe.Print(an(4)-arr(3)) End Sub 程序运行后，单击命令按钮，在输入对话框中输入12，输出结果为 【10】 。