VB.NET system.timers.timer 不停止
SST_X 2019-09-06 01:30:51 大家好!
我用windows.form.timer空间来计时,每隔5秒触发一下getSN sub。但是窗口很卡。我就换成 system.timers.timer 了。但是经常按停止按钮后,仍然不停,还在继续elapsed 事件。看了网上说有多线程,看不懂,请大家帮忙。谢谢!
Private Sub btnStart_Click(sender As Object, e As EventArgs) Handles btnStart.Click
With Timer3
'.SynchronizingObject = Me
.AutoReset = False
.Enabled = True
.Interval = 5000
.Start()
End With
End Sub
Private Sub Timer3_Elapsed(sender As Object, e As ElapsedEventArgs) Handles Timer3.Elapsed
Timer3.Enabled = False
getSN(xrayWorkingDir) ‘处理过程sub
Timer3.Interval = 5000
Timer3.Enabled = True
End Sub
Private Sub btnDebug_Click(sender As Object, e As EventArgs) Handles btnStop.Click
Timer3.Stop()
btnStart.Enabled = True
btnStop.Enabled = False
lblStatus.Text = "Stopped"
lblStatus.BackColor = Color.Yellow
End Sub