代码的开始是引入名字空间System和System.Threading,然后创建一个公用类clsMultiThreading。类clsMultiThreading中包含一个公用方法OwnThread,它执行了5次for循环,每次显示信息到屏幕。创建这个类的目的是为了以单独线程的方式从其他类中调用OwnThread方法。
接着,我们创建另外一个类HelloWorldThreadingInVB,它包含一个方法Main。当最终生成的可执行文件运行时,Main将启动。在方法Main中,我们创建了一个clsMultiThreading类的实例,这样就能调用它的方法OwnThread了。
现在,我们通过传递方法OwnThread的地址的方式来创建线程类实例,实际上这就等于创建了一个新的线程,并且告知线程当它运行时要执行的方法。我们使用函数AddressOf 获取方法OwnThread的地址,然后将之传递到ThreadStart代表类。
然后,我们调用Thread类的Start方法启动了这个新类。新类按照自己的方式开始运行,不再需要依赖创建它的类。
编 译
我们将上面的代码保存为文件Thread.VB,然后将之进行编译:
| vbc.exe Thread.vb /t:exe /debug /cls |
编译成功后,将创建可执行文件Thread.Exe。运行Thread.Exe,我们会得到下面的结果:
![]() |
请注意:来自clsMultiThreading 类和HellWorldThreadinginVB 类的输出信息并不是同步的。这就表明,当执行objNewThread.Start()命令的同时,一个新线程也启动了,并且执行了那个新线程中的OwnThread方法。2个线程是并列运行的,现象就是显示信息数字1到5不是在一起,其中穿插了来自main线程的输出信息。
结 语
以上就是在VB.NET中创建多线程应用的过程。你会感到这是多么的简单,但同时实现了非常强大的功能。使用多线程功能,我们可以创建更好的商业和数据层组件,并且,凭借我们的想像力,将之发挥到更好。