0

我无法弄清楚如何在 VB 中停止后简单地显示计时器的值。

我尝试过类似的东西,MsgBox(Val(Timer2))但显然不是那么简单。

4

3 回答 3

3

也许秒表类对你有用:

    Dim sw As New Stopwatch
    sw.Start()
    'do something, for example:
    Threading.Thread.Sleep(1000)
    sw.Stop()
    MessageBox.Show(sw.ElapsedMilliseconds)
于 2012-12-06T14:24:42.577 回答
1

我想你想要的是这个

Dim StartTime = DateTime.Now()

'Do race stuff



Dim EndTime = DateTime.Now()

Dim ElapsedSeconds = EndTime.Subtract(StartTime).TotalSeconds
于 2012-12-06T14:18:41.187 回答
1

计时器不这样做。但是您可以使用各种日期/时间函数来做同样的事情。

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

这为您提供了以毫秒为单位的总时间。

于 2012-12-06T14:20:53.437 回答