首页 > 解决方案 > 秒表不是以 24 小时为间隔工作,而是以更短的时间间隔工作,如分钟

问题描述

秒表不是以 24 小时为间隔工作,而是以更短的时间间隔工作,如分钟

Dim s1 As Stopwatch = New Stopwatch()
        s1.Start()
        'Dim starttime As String = DateTime.Now.ToString()
        While s1.Elapsed < TimeSpan.FromHours(24)
        End While

使用此方法 TimeSpan.FromMinutes(1440) 而不是 TimeSpan.FromHours(24) 时,相同的代码可以正常工作

标签: .netvb.netsetintervalstopwatch

解决方案


基于 jmcilhinney 的评论。

    Dim s1 As Stopwatch = New Stopwatch()
    s1.Start()
    Dim ts1 As TimeSpan = TimeSpan.FromHours(24.0#)
    Dim ts2 As TimeSpan = TimeSpan.FromMinutes(24.0# * 60.0#)
    Stop 'look at ts1 and ts2.  are they the same?
    'While s1.Elapsed < ts2
    While s1.Elapsed < ts1
        Threading.Thread.Sleep(250)
    End While

表明这一点后,应该注意他的第一条评论。


推荐阅读