VB.NET 中多线程程序开发——线程封装 (二)

发布时间：2020-12-16 23:10:45 所属栏目：大数据来源：网络整理

导读：VB.NET 中多线程程序开发——线程封装 (二) 2008年04月06日星期日 10:56 为了能够灵活地创建线程，我们可以通过多种方法来实现，在众多方法中，使用类将线程包装可谓是最有效的。而这也正发挥了 VB.NET 完全面向对象的特点。 (二) 线程封装为了封装线程，

2008年04月06日星期日 10:56

为了能够灵活地创建线程，我们可以通过多种方法来实现，在众多方法中，使用类将线程包装可谓是最有效的。而这也正发挥了 VB.NET 完全面向对象的特点。

(二) 线程封装

为了封装线程，我们先创建一个类，并为这个类定义三个内部变量，一个构造方法，两个成员方法（其中一个为私有方法），来看代码：

Imports System.Threading

Module Module1

Sub Main()
Dim thA As New MyThreadClass(1,100)
Dim thB As New MyThreadClass(2,100)

thA.Start()
thB.Start()

Console.Read()
End Sub
End Module

Public Class MyThreadClass
Private _ID As Integer
Private _LoopCount As Integer
Private _thread As Threading.Thread

Public Sub New(ByVal Id As Integer,ByVal LoopCount As Integer)
Me._ID = Id
Me._LoopCount = LoopCount
Me._thread = New Threading.Thread(New ThreadStart(AddressOf Me.Run))
End Sub

Public Sub Start()
Me.Run()
End Sub

Private Sub Run() '该方法为私有方法
Dim intCount As Integer
For intCount = 0 To Me._LoopCount
Console.WriteLine("第 {0} 个线程正在执行 {1} ...",Me._ID,intCount)
Next
End Sub
End Class

通过这样的封装，我们在创建线程的时候，就可以灵活地给出相应的参数。当然，上述代码仅是一个简单的例子，在实际应用中，我们可以根据自己的需求来包装线程。

下一节，我们将会了解线程的控制。

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!