vb.net 教程 6-15 终止线程更好的例子

当前位置:

首页 > 编程开发 > vb >

vb.net 教程 6-15 终止线程更好的例子

由于子线程很多时候都是需要长时间运算（如循环读写）之类，在它循环的时候检测变量状态是否符合，符合则退出循环，完成收尾工作，然后结束该线程。

尽量避免生硬的使用Abort方法。

定义一个模块级变量：

Dim abortThread As Boolean

使用到的类：

Class clsSum2

Public inputNum As Integer

Public currentNum As Integer

Public outputSum As Integer

End Class

主代码：

Sub sample10()

abortThread = False

Dim maxNum As Integer = 20

Dim sumNumber As New clsSum2

sumNumber.inputNum = maxNum

Dim sample10_Thread As New Thread(AddressOf sample10_getSum)

sample10_Thread.Start(sumNumber)

Do While True

If sumNumber.currentNum >= 10 Then

abortThread = True

Exit Do

End If

Thread.Sleep(10)

Loop

sample10_Thread.Join()

Console.WriteLine("终止时运行到：{0}，和为：{1}", sumNumber.currentNum, sumNumber.outputSum)

Console.ReadKey()

End Sub

Sub sample10_getSum(ByVal obj As Object)

Dim testSum As New clsSum2

testSum = CType(obj, clsSum2)

Dim sum As Integer = 0

For i As Integer = 0 To testSum.inputNum

If abortThread = True Then Exit For

sum += i

testSum.currentNum = i

Thread.Sleep(10)

testSum.outputSum = sum

End Sub

这里只是介绍如何更好的终止线程，

但是需要注意的是，由于通常是系统管理线程，如果只是想通过主线程不断循环来控制子线程，可能达不到想要的结果。

因此上面的代码的结果仍然可能会是“终止时运行到：10，和为：55”或者“终止时运行到：11，和为：55”。如果是需要比较精确的结果，还是使用《vb.net 教程 6-13 线程调用类的方法并触发事件》中的方法。

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看 vb.net 教程目录

————————————————

原文链接：https://blog.csdn.net/UruseiBest/article/details/87898368

栏目列表