求助VB中的timer事件问题
我从网上下载了vb6.0精简版，我想timer事件每隔一秒就执行一次，但为什总是执行一次就停止了，而不是重复执行？？？ 
,高手看看是不是代码出了问题。给点意见-----------------------------------------------------------------------------
这是界面 ，【】内为这个控件的名称,//内为这个控件的caption.
/倒计时时间（s）/【label3】 //【text1】
/ 还剩时间（s）/【label1】 //【label2】
/ 开始/【command1】 【timer1】
--------------------------------------------------------------------------
timer的属性设置
timer1.inter=1
enabled=false
-----------------------------------
代码如下:
-----------------------------------------------------------------
Private Sub Command1_Click()
If Text1.Text = "" Then MsgBox "请输入秒数！", vbInformation, "操作提示"
Timer1.Enabled = True
End Sub
-------------------------------------------------------
Private Sub Form_Load()
Timer1.Enabled = False
End Sub
-----------------------------------------------------------
Private Sub Timer1_Timer()
Dim ss As Integer
ss = Val(Text1.Text)
ss = ss - 1
Label2.Caption = ss
If ss > 0 Then Timer1.Enabled = True
If ss = 0 Then
Timer1.Enabled = False
Label2.Caption = 0
End If
End Sub
--------------------------------------------------
我已经尽量写清楚了，如果有必要请+q 457561647
