要求：
1.如图 暂停1对应lable1 暂停2对应lable2 暂停3对应lable3
2.单击 COMMAND1开始记时 按钮 随即Label1 Label2 Label3 都开始记时！ 在单击暂停1时 Label1 停止记时 在单击暂停2时 Label2 停止记时 在单击暂停3时 Label3 停止记时


希望有哪位高手帮我下！急求！~~~~~~~
我的QQ是：121269875

开始控制的时候有点难,不会弄,如何开始将三个记时器都置零,还望高手指教.本人只能做到最简单的,惭愧.
Option Explicit
Dim T1 As Date
Private Sub Command1_Click()

End Sub

Private Sub Command2_Click()
Timer1.Enabled = False

End Sub

Private Sub Command3_Click()
Timer2.Enabled = False

End Sub

Private Sub Command4_Click()
Timer3.Enabled = False
End Sub

Private Sub Form_Load()
T1 = Time()
Text1 = T1
End Sub
Private Sub Timer1_Timer()
Dim hh As Long
Dim mm As Long
Dim ss As Long
Dim mTs As Date
mTs = Time()
hh = DateDiff("h", T1, mTs)
mm = DateDiff("n", T1, mTs)
ss = DateDiff("s", T1, mTs)

Label3.Caption = Format(hh & ":" & mm & ":" & ss, "hh:mm:ss")

End Sub

Private Sub Timer2_Timer()
Dim hh As Long
Dim mm As Long
Dim ss As Long
Dim mTs As Date
mTs = Time()
hh = DateDiff("h", T1, mTs)
mm = DateDiff("n", T1, mTs)
ss = DateDiff("s", T1, mTs)

Label2.Caption = Format(hh & ":" & mm & ":" & ss, "hh:mm:ss")

End Sub

Private Sub Timer3_Timer()
Dim hh As Long
Dim mm As Long
Dim ss As Long
Dim mTs As Date
mTs = Time()
hh = DateDiff("h", T1, mTs)
mm = DateDiff("n", T1, mTs)
ss = DateDiff("s", T1, mTs)

Label1.Caption = Format(hh & ":" & mm & ":" & ss, "hh:mm:ss")
End Sub

Private Sub 开始记时_Click()

End Sub