大学职业资格刷题搜题APP
创建自己的小题库
搜索
【判断题】
总账模块不是 ERP 软件中常见的功能模块。
A.
正确
B.
错误
手机使用
分享
复制链接
新浪微博
分享QQ
微信扫一扫
反馈
收藏
举报
参考答案：
举一反三
【单选题】针对下列生活中常见的安全事故，做法错误的是（ ）。
A.
发生火灾时，如果浓烟太大，可以用口罩或者毛巾捂住El鼻，身体尽量贴着地面前进或者爬行
B.
一旦发生烫伤，自己可以先在伤口处涂点牙膏、碱面等，以暂缓疼痛；若烫伤处有水疱，需要挑破，以防水疱变大
C.
当发现有人触电时，应尽快找到电闸，切断电源
D.
煤气泄漏时，应立即关闭煤气阀并开窗透气，且不能打电话或者使用打火机等，以免引发爆炸
【单选题】有如下事件过程：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
相关题目：
【单选题】针对下列生活中常见的安全事故，做法错误的是（ ）。
A.
发生火灾时，如果浓烟太大，可以用口罩或者毛巾捂住El鼻，身体尽量贴着地面前进或者爬行
B.
一旦发生烫伤，自己可以先在伤口处涂点牙膏、碱面等，以暂缓疼痛；若烫伤处有水疱，需要挑破，以防水疱变大
C.
当发现有人触电时，应尽快找到电闸，切断电源
D.
煤气泄漏时，应立即关闭煤气阀并开窗透气，且不能打电话或者使用打火机等，以免引发爆炸
【单选题】有如下事件过程：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
参考解析：
题目纠错 0
发布
