转： VB.Net 中实现延迟的几种方法分析

转： http://topic.csdn.net/t/20020730/03/909318.html

 

1.   Threading.Thread.Sleep(...)  
  优点：   简单  
  缺点：   Sleep期间程序（其实是该线程）没有任何响应。  
   
  2.   Timer(定时器)  
        定时器有3种。Forms.Timer/   Timers.Timer/   Threading.Timer  
        第一种是在当前线程启动事件处理，第二种在事件发生时会启动一临时线程处理事件，第三种在事件发生时在一临时线程中调用指定的回调函数。  
  优点：   不阻塞当前线程  
  缺点：   需要定义一事件函数以处理定时事件。  
   
  3.   DoEvents(保证消息循环)  
        可以使用一循环执行定时。代码示例：  
          Public   Shared   Sub   Sleep(ByVal   Interval)  
                  Dim   __time   As   DateTime   =   DateTime.Now  
                  Dim   __Span   As   Int64   =   Interval   *   10000   '因为时间是以100纳秒为单位。  
                  While   (DateTime.Now.Ticks   -   __time.Ticks   <   __Span)  
                          Application.DoEvents()  
                  End   While  
          End   Sub  
   
  优点：   不阻塞当前线程的消息循环。  
  缺点：   不能保证消息处理能否及时回来。  
   
  ===========================================  
  结论：    
  1.   在没有消息循环线程中，使用Thread.Sleep  
  2.   在带消息循环线程中，如果需要定时执行一段程序，使用Forms.Timer  
  3.   在带消息循环线程中，若只想延时一段时间，请使用上面示例中自定义的Sleep  
  4.   若要保证定时精度，请使用Threading.Timer或Timers.Timer.(这两个只是调用接口不一样，   一个是回调函数，一个是事件；前者更精确些)