VB.NET多线程开发实例

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 /out:threadtest.exe threadtest.vb 　
　9.运行编译后的程序，我们将会看到我们定义的两个方法和main()方法的混合输出，这就说明每一个方法都在自己的线程下运行。
　　10.除了上面的方法，线程还有下面常用的方法：
　　Stop():停止线程的运行。
　　Suspend()：暂停线程的运行。 　
　Resume()：继续线程的运行。 　
　Sleep()：停止线程一段时间（单位为毫秒）。 　　
上面只是VB.NET多线程的一个简单的例子，希望对大家有所启发！