下载APP
举一反三
【单选题】有如下事件过程：Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是，通过调用Converse过程，将数组Arr中的元素逆序存放并输出...
A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
【单选题】王某回国携带应申报物品而未向海关申报，海关认定王某的行为构成走私，对其作出没收物品，并罚款1000元人民币的处罚。海关的上述处罚是否正确( )
A.
是错误的，只能实施没收物品的处罚
B.
是错误的，只能实施罚款1000元的处罚
C.
是错误的，只能在没收与罚款中选择一种实施处罚
D.
是正确的，不违反一事不再罚的原则
【单选题】建设项目未依法进行环境影响评价，被责令停止建设，拒不执行，尚不构成犯罪的该如何处罚（）
A.
由公安机关拘留
B.
由县级以上人民政府环境保护主管部门或者其他有关部门将案件移送公安机关，对其直接负责的主管人员和其他直接责任人员，处十五日以上拘留
C.
由县级以上人民政府环境保护主管部门或者其他有关部门将案件移送公安机关，对其直接负责的主管人员和其他直接责任人员，处十日以上十五日以下拘留
D.
由县级以上人民政府环境保护主管部门或者其他有关部门将案件移送公安机关拘留