Visual Basic.NET程序设计教程 陈语林 p10新.ppt

第十章 多线程应用程序的开发 .NET框架的一个新特性就是，它包含了一个标准的创建自由线程应用程序的方法。 支持建立自由线程（free-threaded）的应用。自由线程允许Visual Basic.NET应用程序同时独立执行多个任务，因而提高了应用程序的性能和灵敏性。 10.1 进程和线程 每个运行的Windows应用程序都有一个进程，它在逻辑上代表了这个应用程序的地址空间，DLL可以加载到这个空间里，变量也可以存储在这里。要完成任何工作，一个进程必须有一个执行的路径，或者说线程。 自由线程（free threaded）允许Visual Basic.NET应用程序同时独立执行多个任务，因而提高了应用程序的性能和灵敏性。 .NET框架中包含的System.Threading命名空间专门负责实现多线程功能，而且操作相当简单，只需要利用System.Threading命名空间中的Thread类，就具有了实现自由线程的属性和方法。 Thread类的每一个实例都代表了应用程序进程空间里一个不同的线程。 10.2 多线程应用程序 【例10-1】多线程的应用程序示例。 10.2.1 如何创建一个新线程 要实现多线程必须引用命名空间System.Threading，因此，先输入下列代码： Imports System.Threading 一个无限循环的代码如下： Private Sub BackgroundProcess( ) Dim i As Integer=1 Do while True ProgressBar1.Value=i i+=1 If i =10000 Then i =1 Loop End Sub 下面的代码声明了一个新的线程，并启动它： Dim t1 As Thread t1=New Thread (AddressOf Me.BackgroundProcess) 10.2.2 控制线程 如果你想让数据处理的速度变慢，可以在其中放入一个sleep方法的调用，代码如下： Private Sub BackgroundProcess( ) Dim i As Integer=1 Do While True ProgressBar1.Value=i i+=1 If i= 10000 Then i=1 Thread.CurrentThread.Sleep(10) Loop End Sub 10.2.3 线程的生存期 线程启动后，发生下列事件线程将终止： 它运行的方法执行完毕。 包含线程的过程终止。 在线程对象上调用Abort方法。 在上面的示例中，它是一个无限的循环，因此必须调用Thread.Abort方法，向程序中添加如下代码： t1.Abort（ ） Public Class Form1 Inherits System.Windows.Forms.Form Dim t1 As Thread Dim t2 As Thread Private Sub BackgroundProcess() Dim i As Integer = 1 Do While True ProgressBar1.Value = i i += 1 If i = 10000 Then i = 1 Loop Thread.Sleep(1) End Sub Private Sub ReceiveDataProcess() Dim i As Integer = 1 Do While True ProgressBar2.Value = i i += 1 If i = 10000 Then i = 1 Loop End Sub Private Sub ButtonBackProc_Click(ByVal Sender As System.Object,ByVal e As System.EventArgs) Handles ButtonBackProc.Click t1 = New Thread(Address