Question

vb.net 如何强制终止子线程？

如果子线程t1出错，进入死循环，那么如何强制结束这个线程？
回复1楼回答：
这样子运行会把主程序关掉啊，我试了下，在子线程中获取的句柄与在主线程中获取到的句柄是一样的，所以才会关闭主程序，这是什么原因啊？
特别感谢peter987662。

Answer 1

使用api
Private Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As Long

追问

使用时TerminateThread（hThread,dwExitCode）中 hThread 应该写什么啊？ 写t1回报错啊，还有，麻烦介绍下dwExitCode有哪几种，分别什么意思，先谢谢了

追答

hThread参数用于标识被终止运行的线程的句柄
函数执行成功则返回非零值，执行失败返回0。调用getlasterror获得返回的值。

追问

如何获得他线程的句柄呢？麻烦举个例子好吧？谢谢了
比如 t1 = New Threading.Thread(AddressOf choosework)
t1.start() ‘t1出错，进入死循环
然后，怎样写才能强制终止它？

追答

我又看了一下，好像只要一句话：
T1.Abort() '结束线程

追问

这个在线程进入死循环时是无效的。

追答

这样试试
TerminateThread(GetCurrentThread())

Answer 2

Thread.Abort 中止一个线程的执行

强制中止之后，要将该线程所用的资源释放。