分析解答问题.
学校举行校园歌手大赛，评委由6人组成，评分方法，去掉一个最高分和一个最低分，计算其余4位评委的平均分，作为选手的最终得分。
（1）在设计界面过程中，窗体中录入评委打分的对象是下面图中哪个控件生成的？______（填写编号：1/2/3/4）

（2）定义一个数组储存六个评委的成绩，需要定义的类型为______（填字母）

A．integer

B．boolean

C．long

D．single

（3）下列程序代码片段对应于算法描述中的第2步至第4步。请填写片段中括号内空白处的表达式：_________ 
max=a(1)
min=a(1)
s=a(1)
For i=2 to 6
s=s+a(i)
If a(i)>max then max=a(i)
If a(i)<min then min=a(i)
Next i
Aver=（   ）/4  ’计算出选手的最终得分aver

用VB设计一个模拟选手得分程序，在文本框Text1中输入裁判人数（人数大于2），然后点击Command1按钮，在List1中产生70到100的随机数为裁判的打分，去除一个最高分，去除一个最低分，取其他裁判打分的平均分作为最终得分显示在文本框Text2中，运行效果如图所示。

（1）若要在程序运行时，修改窗体显示的标题为“得分计算”，则下面语句可行的是__________。
（单选，填字母：A.Command1.Caption=“得分计算”/B.Form1.Name=“得分计算”/C.Form1.Text=“得分计算”/

A．Form1.Caption=“得分计算”）

（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim n As Integer   '裁判人数
Dim max As Integer, min As Integer, sum As Integer
Dim AveScore As Single  '存储最终得分
n = Val(Text1.Text): sum = 0
If n <= 2 Then MsgBox ("输入数据要大于2，请重新输入！")
If n > 2 Then
List1.Clear
Randomize
score = Int(Rnd() * 31) + 70
List1.AddItem Str(score)
_______________________ ' ①
max = score
min = score
For i = 2 To n
score = Int(Rnd() * 31) + 70
List1.AddItem Str(score)
If score > max Then max = score
If score < min Then min = score
sum = sum + score
Next i
AveScore = ______________________ '②
Text2.Text = Str(AveScore)
End If
End Sub
（3）若要将最终得分保留一位小数（四舍五入），下列代码可行的是______________________。
A.AveScore=int(AveScore+0.5)
B.AveScore=int(AveScore*10+0.5)/10
C.AveScore=int(AveScore*100+0.5)/100

文本框中内容由（_______________）属性决定.

程序填空题，以下程序需要完成的功能是：输入a,b三个整数，输出最小数（3分）
Dim a as integer, b as integer, min as integer
a=Val(InputBox(“”))
b=Val(InputBox(“”))
___________________________
min=b
Else
min=a
End if
Label1.Caption=_____________

在 VB 中，有整数型变量 x、y，下列叙述不．正．确．的是（ ）

A．y="x+1" 可以作为赋值语句使用

B．y="x+1" 可以作为表达式使用

C．x+1="y" 可以作为赋值语句使用

D．x+1="y" 可以作为表达式使用