我无法弄清楚如何在 VB 中停止后简单地显示计时器的值。
我尝试过类似的东西,MsgBox(Val(Timer2))
但显然不是那么简单。
也许秒表类对你有用:
Dim sw As New Stopwatch
sw.Start()
'do something, for example:
Threading.Thread.Sleep(1000)
sw.Stop()
MessageBox.Show(sw.ElapsedMilliseconds)
我想你想要的是这个
Dim StartTime = DateTime.Now()
'Do race stuff
Dim EndTime = DateTime.Now()
Dim ElapsedSeconds = EndTime.Subtract(StartTime).TotalSeconds
计时器不这样做。但是您可以使用各种日期/时间函数来做同样的事情。
Dim startTime As DateTime
Dim elapsed As DateTime
' ...
Timer2.Start()
startTime = Now
' after race finishes, then:
elapsed = Now - startTime
这给了你一个TimeSpan
对象。
或者
Dim startTime As Integer = Environment.TickCount
' ...
Dim elapsed As Integer = Environment.TickCount - startTime
这为您提供了以毫秒为单位的总时间。