您好,肖大哥就為大家解答關于terminatethread結束自己線程后程序崩了相信很多小伙伴還不知道,現在讓我們一起來看看吧！

1、VB6.0的。

2、代碼如5261下。

3、單擊窗體4102效果就1653顯現。

4、版＝＝權＝＝＝＝＝＝＝＝＝＝＝＝＝＝Option ExplicitPrivate Declare Function GetCurrentThread Lib"kernel32"() As LongPrivate Declare Function GetExitCodeThread Lib"kernel32"(ByVal hThread As Long, lpExitCode As Long) As LongPrivate Declare Function TerminateThread Lib"kernel32"(ByVal hThread As Long, ByVal dwExitCode As Long) As LongPrivate Sub Form_Click()Dim hT As OLE_HANDLE, lEC As LonghT = GetCurrentThreadGetExitCodeThread hT, lECTerminateThread hT, lECEnd Sub。

本文就講到這里，希望大家會喜歡。