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 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 に答える
1

あなたが欲しいのはこれだと思います、

Dim StartTime = DateTime.Now()

'Do race stuff



Dim EndTime = DateTime.Now()

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