线程的实现

线程的实现

- 中国WEB开发者网络 (http://www.webasp.net)
-- 技术教程 (http://www.webasp.net/article/)
--- 线程的实现 (http://www.webasp.net/article/10/9393.htm)

-- 作者：未知
-- 发布日期： 2004-05-21

1．1．1 创建和使用线程

用户可以通过声明一个变量类型System.Threading来建立一个新的线程。并且还提供了一个AddressOf操作和一个用户想运行的过程或方法。例如：

Dim mythread as New System.Threading.Thread(AddressOf MySub)

用户可以使用”Start”方法来开始一个线程，例如Thread.Start()。

下面我们就举个例子，来看看VB.NET的多线程是怎样创建和使用的。

Public Class AClass

Public Sub Method()

Dim i As Integer

For i = 1 To 100

Next

MsgBox("该程序启动了一个线程，他的值是：" + CStr(i))

End Sub

End Class

导入命名空间：

Imports System.Threading

在主窗体的Form1_load的事件中添加以下代码：

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim obj As New AClass()

Dim th1 As Thread

th1 = New Thread(New ThreadStart(AddressOf obj.Method))

th1.Start()

End Sub

现在让我们来剖析一下上面的例子：

l 我们创建了我们自己的类AClass，并创建了两个方法：Method（）

l 这个方法很简单，只有一个For循环，用MsgBox函数输出线程运行的结果。

l 类Thread可以在System.Threading名字空间里得到，它定义了处理线程的属性和方法。

l 在类Thread的构造器中，我们使用了类ThreadStart，类ThreadStart是一个代表，标志着当一个线程开始时就开始执行定义的方法。

l 为了执行定义的方法，我们实际调用的是线程的Start()方法。

l 除了上面的方法，线程类还有下面常用的方法：

Abort():停止线程的运行。 Suspend()：暂停线程的运行。 Resume()：继续线程的运行。 Sleep()：停止线程一段时间（单位为毫秒）。

webasp.net