有如下Visual Basic程序段：
s=1
for i=" 1" to 11 step 3
s=s*i
next i
语句s=s*i共执行的次数为（   ）

A．11

B．10

C．5

D．4

某算法的部分流程图如图所示，执行这部分流程，输入n的值为5，则输出值依次为

A．4，16

B．4，5

C．5，16

D．5，5

在一次校园歌手大奖赛中，有20位评委负责评判，打分的上限是10分。统计选手得分时，去掉一个最高分，再去掉一个最低分，然后取评委打分的平均值作为选手的最后得分。根据上述规则，信息小组设计了计算选手得分的程序。核心部分的程序如下：
‘d数组中存放了20位评委的打分
Smax=0:smin=10:score=0
For  i=1  To  20

Next i
score =" (" score – smax – smin )/18
Text1.Text= smax
Text2.Text= smin
Text3.Text= score
请分析任务和程序段，完成下列题目。
（1）程序段中出现的Text1、Text2、Text3是 类型的控件。（选填“A”或“B”）

A．列表框

B．文本框

（2）在设计用户界面时，要在启动计算过程的按钮上显示“计算”二字，应该将按钮的“ ”属性值设置为“计算”。
（3）为精确地显示选手的最后得分，变量score的数据类型应定义为   。
（4）程序执行过程中，程序段中虚线框内的代码将被执行 次。
（5）请分析程序，将程序段中虚线框内的空白处补充完整。
If    

若输入两数1，-4，输出结果_______

A．-5	B．-3
C．5	D．3

以下程序实现倒计时功能，编辑界面如下。在Text1中输入数字后，点击“开始”按钮后，在Label1中显示从输入的值到0，每隔1秒中，数字减1。
根据题目要求，完成下面各题。

程序的代码代码，如下：
Dim t As Integer
Private Sub Command1_Click()
t = Val(①)
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Label1.Text = Str(t) ②
If  t =" 0" Then
Timer1.Enabled = False
MsgBox "时间到！"
Else
③ '数字t减1
End If
End Sub
（1）根据题目意思，应该把Timer1的Interval设置为     。
（2）在①处，应填上代码 。
（3）②所在行，运行时提示错误“未找到方法或者数据成员”，应改正为 。
（4）在③处，应填上代码   。