VB.NET中多线程程序开发之线程控制

转自:http://tech.ddvip.com/2008-11/122595602689670.html

 

在了解了线程的各种状态之后,我们来看一下线程控制的一些方法,如下表:


是否需要实例化 方法 说明
是 Start 使线程开始执行
是 Suspend 当线程到达一个安全点时暂停线程
是 Abort 当线程到达一个安全点时停止线程
是 Resume 恢复一个被挂起的线程
是 Join 等待一个线程结束
是 Interrupt 中断一个处于 WaitSleepJoin 状态的线程
否 Sleep 在指定的时间内暂停调用线程
否 SpinWait 通过空转来延迟线程的执行,在此过程中,线程仍然在执行,这好比创建了一个不断运行直到计数器用完为止的循环一样。


上表中,安全点是指代码中 CLR 可以安全执行自动垃圾回收的位置。    下面我们来对Sleep 和 Join 给予额外的说明:

1、 Thread.Sleep 当线程处于 Running 状态时,它可以调用 Sleep 方法。  

  Sleep 方法有两种不同的用法

'放弃线程的执行

 '通过指定一个 Integer 类型的数值作为时间参数(毫秒)
'或TimeSpan(类型的参数) 使当前线程
'进入 WaitJoinSleep 状态
Thread.Sleep(1000)
Thread.Sleep( New TimeSpan(0,100))
'放弃线程的执行
'不要使当前线程进入 WaitJoinSleep 状态
'把时间片让给其它线程
'通过指定参数 0 或 TimeSpan.Zero
Thread.Sleep(0)
Thread.Sleep(TimeSpan.Zero)

2、 Thread.Join Join 方法是我们可以使用的最简单的同步构造,在一个线程上调用 Join 方法时,调用线程会进入 WaitJoinSleep 状态,而且将一直保持到被调用的线程已经结束,这将允许线程阻塞执行,挂起到系统中其它线程的完成。请看如下示例: Sub Main() Dim thd1 As New Thread( AddressOf Sub1)   Dim thd2 As New Thread( AddressOf Sub2)   thd1.Start()   thd2.Start()   '等待上面两个线程结束   thd1.Join()  thd2.Join()   '这时,可以保证两个线程都已经结束 End Sub 现在我们对线程的控制方法已经明白了,那么我们如何将这些知识应用到实践中呢?我们可能都遇到过这种情况: Private Done As Boolean = False   Public Sub Begin()   While Not Done    End While  Console.WriteLine( "Done,OK!" ) End Sub 这种做法,可能你我以前都用过,很明显,它会给系统带来非常沉重的负担。现在,我们可以利用 Thread.Sleep 方法来改善上述状况: Private Done As Boolean = False Public Sub Begin()    While Not Done       Thread.Sleep(1000)    End While Console.WriteLine( "Done,OK!" ) End Sub     对比一下,仅仅加了一条语句,却使代码性能大大提升。当然,这个例子不过是冰山一角。 下一节,我们将会了解线程同步。

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...