vb.net - 长时间运行的过程

Question

我很快写了这个小的 rinky-dink vb.net 控制台应用程序来向某人展示一些东西。当我看到它时，我认为一定有比使用循环消耗更好的方法

虽然是真的

...

结束时

但我不知道它是什么。有什么想法吗？

Module ControlExecutive
    Private WithEvents MyTimer As New Timers.Timer
    Sub Main()
        MyTimer.Interval = 10000
        Console.WriteLine("Start timer, interrupt every 10000 ms")
        MyTimer.Start()
        OuterLoop()
    End Sub

    Sub OuterLoop()
        While True
            'wait for timer interrupts
        End While
    End Sub

    Sub HandleTimerInterrupt(ByVal sender As Object, ByVal e As System.Timers.ElapsedEventArgs) Handles MyTimer.Elapsed
        Console.WriteLine(String.Format("Interrupt at {0}", DateTime.Now))
    End Sub
End Module

Answer 1

而不是（或内部）等待的循环，您应该使用System.Threading.Thread.Sleep(milliseconds). 这将暂停线程而不会导致 CPU 峰值。