VB.NET多线程开发实例（转）

VB.NET（Visual Basic.NET）是为适应Microsoft .NET框架的需要，对Visual Basic进行了重大改造后的开发工具。它比Visual Basic 6.0功能更强大，更易于使用。其中最重要的变化就是对象继承，在VB.NET中，所有可管理的类型都衍生自System.Object。作为编程工具，最重要的一个特性就是垃圾碎片的回收，它由CLR（Common Language Runtime）进行控制，并提供更好的内存管理功能。通用的类型定义可以提供更好的互操作性和协同工作能力，因此，VB.NET显得更强大、更具可靠性。

　　在VB.NET中，大多数CLR内建的类型都在System名字空间里已经定义了。比如：System.Object,System.Int32, 和 System.String。要注意的是：一个名字空间可能嵌在另一个名字空间内，象System.Data里就有System.Data.DataSet的类。代表是CLR编程模型很重要的一个新概念。代表是一个特殊类型的可管理的类，当你创建一个代表的实例时，你必须提供一个带有匹配签名的方法执行的地址，一旦创建了一个代表的实例，调用方法将变的很容易。

　　过去，我们利用VB开发多线程的应用程序时，是一件很令人痛苦的事，经常是多线程的程序运行是会变成多错误的程序！但在VB.NET中，这种状况已经大为改观。现在，我们利用VB.NET处理多线程和利用JAVA处理多线程一样简单了。下面我们就举个例子，来看看VB.NET的多线程吧！


下面是多线程程序threadtest.vb的代码：
　
imports System
imports System.Threading
　
public class AClass
　
public sub Method1()
Dim i as integer
For i = 1 to 100
Console.Writeline("这是类AClass方法method1的内容",i)
next
end sub
　
public sub Method2()
Dim i as integer
For i = 1 to 100
Console.Writeline("这是类AClass方法method2的内容",i)
next
end sub
　
end class
　
public class ThreadTest
　
public shared sub Main()
dim obj as new aclass
dim th1,th2 as thread
　
th1=new Thread(new ThreadStart(addressof obj.method1))
th1.start
　
th2=new Thread(new ThreadStart(addressof obj.method2))
th2.start
　
dim i as integer
For i= 1 to 100
Console.WriteLine("Main方法里的内容",i)
Next
end sub
　
end class
　
现在，来让我们剖析一下上面的例子：
1.我们创建了我们自己的类AClass，并创建了两个方法：Method1和Method2。
2.这两个方法很简单，只有一个For循环，向输出设备输出一些信息。
3.我们还定义了另外一个类ThreadTest来使用上面创建的类AClass。
4.在Main()方法中，我们创建了类Thread的实例。
5.类Thread可以在System.Threading名字空间里得到，它定义了处理线程的属性和方法。
6.在类Thread的构造器中，我们使用了类ThreadStart，类ThreadStart是一个代表，标志着当一个线程开始时就开始执行定义的方法。
7.为了执行定义的方法，我们实际调用的是线程的Start()方法。
8.用VBC来编译上面的程序：vbc /t:exe threadtest.vb
9.运行编译后的程序，我们将会看到我们定义的两个方法和main()方法的混合输出，这就说明每一个方法都在自己的线程下运行。
10.除了上面的方法，线程还有下面常用的方法：
Stop():停止线程的运行。
Suspend()：暂停线程的运行。
Resume()：继续线程的运行。
Sleep()：停止线程一段时间（单位为毫秒）。

原文转自：http://www.ltesting.net