线程里可以停止计时器,却不能启动计时器?
coxi 2004-12-13 05:32:12 '测试代码如下(vb.net):
Private ThreadStartTimer As New Threading.Thread(AddressOf StartTimer)
Private ThreadStopTimer As New Threading.Thread(AddressOf StopTimer)
'启动无效
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ThreadStartTimer.Start()
End Sub
'停止有效
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ThreadStopTimer.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Label1.Text = Now
End Sub
Private sub StartTimer()
Timer1.Interval = 1000
Timer1.Enabled = True
Timer1.Start()
End Sub
Private sub StopTimer()
Timer1.Enabled = False
Timer1.Stop()
End Sub