以下程序实现倒计时功能,编辑界面如下。在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)在③处,应填上代码 。