搜题请搜索小程序“爱下问搜题”
问题 单项选择题

当轿厢达到额定重量时，满载开关动作。满载开关动作后，（）。

A、电梯不再响应内选信号

B、电梯只响应外召信号

C、电梯不关门，超载铃报警

D、电梯不再响应外召，只响应内选信号

答案

参考答案：D

问答题

在考生文件夹下有一个工程文件sjt4.vbp(相应的窗体文件名为sjt4.frm)，其功能是通过调用过程Average求数组的平均值，请装入该文件。程序运行后，在4个文本框中各输入一个整数，然后单击命令按钮，即可求出数组的平均值，并在窗体上显示出来(如下图所示)。这个程序不完整，请把它补充完整，并能正确运行。

要求：去掉程序中的注释符，把程序中的“”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。

最后把修改后的文件按原文件名存盘。

[试题源程序]

1 Option Base 1

2 Private Function Average(a( )As Integer)As Single

3 Dim Start As Integer，Finish As Integer

4 Dim i As Integer

5 Dim Sum As Integer

6 ’Start=(a)

7 ’Finish=(a)

8 ’Sum=

9 For i=Start To Finish

10 ’Sum=Sum+

11 Next i

12 ’Average=

13 End Function

14

15 Private Sub Command1_Click( )

16 Dim arr1

17 Dim arr2(4)As Integer

18 arr1=Array(Val(Text1.Text)，Val(Text2Text)，Val(Text3.Text)，Val(Text4.Text))

19

20 For i=1 To 4

21 arr2(i)=CInt(arrl(i))

22 Next i

23 ’Aver=Average()

24 Print "平均值是："；Aver

25 End Sub
查看答案
单项选择题

创新是社会进步的灵魂，（）是推动经济社会发展、改善民生的重要途径。

A.科技进步

B.互联网+

C.社会和谐

D.创业
查看答案