VBでThread.Sleepを使用した不思議な動作

Question

以下は、実行を中断するためのThread.Sleepを使用する単純なコードと、スレッドが実際にスリープした時間を見つけるためのStopwatch.ElapsedMillisecondsです。

Dim sw As New Stopwatch() 
Dim elapsed_ms As Integer = 0 

sw.Start() 
While True 
    Threading.Thread.Sleep(10) 
    elapsed_ms = CInt(sw.ElapsedMilliseconds) 
    Debug.WriteLine("Elapsed: " & elapsed_ms & " ms") 
    sw.Restart() 
End While 

私の質問は：時折、デバッグプリントは0ミリ秒が経過したことを述べています。これはどのように可能ですか？私は、Thread.Sleep（10）が正確ではなく、通常10ミリ秒以上スリープしていることを知っていますが、最低10ミリ秒スリープすることが保証されていると思いました。

Answer 1

私は個人的にはさまざまな理由でThread.Sleepを使用しないようにしていますが、あなたが見ている不規則さはその1つです。

Thread.Sleepを呼び出す代わりに、私はあなたが眠っていたどんな増分のためにも将来のタイムアウトを計算して、何もしないループwhileを使用します。私はあなたが変な行動を見ている理由は、これはThread.Sleepと説明していない。しかし、私はThread.Sleepはマイナス面をたくさん持っているし、かなり回避することができる言及する価値だと思った知って

While True 
    Dim l_TO As Date = Now.AddMilliseconds(10) 
    While l_TO > Now 
     'Do Nothing, 
     'Sometimes I will put a Thread.Sleep call in here but that's usually if the amount of time being waited is more than seconds. 
     'Mainly because a loop of this nature will chew up more processing power than you would expect. 
     Thread.Sleep(1) 'Probably not need because of the short time that you are forcing the program to wait. 
    End While 
    elapsed_ms = CInt(sw.ElapsedMilliseconds) 
    Debug.WriteLine("Elapsed: " & elapsed_ms & " ms") 
    sw.Restart() 
End While 

：だからあなたのメインWhileループは次のようになります。簡単に。